alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* mu4e-hdrs: make field header position depend on fringe size

Browse Source
This commit is contained in:
djcb
2011-12-31 16:06:05 +02:00
parent 4ea353d6da
commit 5bfc5b0efe
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
emacs/mu4e-hdrs.el
View File

@ -356,11 +356,12 @@ after the end of the search results."
buffer-undo-list t ;; don't record undo information buffer-undo-list t ;; don't record undo information
buffer-read-only t buffer-read-only t
overwrite-mode 'overwrite-mode-binary) overwrite-mode 'overwrite-mode-binary)
(setq header-line-format (setq header-line-format
(cons "* " (cons
(make-string (floor (fringe-columns 'left t)) ?\s)
(map 'list (map 'list
(lambda (item) ;; FIXME (lambda (item)
(let ((field (cdr (assoc (car item) mu4e-header-names))) (let ((field (cdr (assoc (car item) mu4e-header-names)))
(width (cdr item))) (width (cdr item)))
(concat (concat