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

mu4e: update headers for new quoting

Browse Source 
update for the new query parser
This commit is contained in:
djcb
2017-10-25 01:15:00 +03:00
parent 85a9098962
commit 5d3d9e274f
1 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
mu4e/mu4e-headers.el
View File

@ -1183,8 +1183,8 @@ message, you can use `mu4e-headers-find-if-next'."
(save-excursion (save-excursion
(while (and (null pos) (while (and (null pos)
(funcall search-func mu4e~headers-docid-pre nil t)) (funcall search-func mu4e~headers-docid-pre nil t))
;; not really sure why we need to jump to bol; we do need to, otherwise we ;; not really sure why we need to jump to bol; we do need to, otherwise
;; miss lines sometimes... ;; we miss lines sometimes...
(let ((msg (get-text-property (line-beginning-position) 'msg))) (let ((msg (get-text-property (line-beginning-position) 'msg)))
(when (and msg (funcall func msg)) (when (and msg (funcall func msg))
(setq pos (point)))))) (setq pos (point))))))
@ -1674,8 +1674,7 @@ maildir)."
(list maildir))) (list maildir)))
(when maildir (when maildir
(mu4e-mark-handle-when-leaving) (mu4e-mark-handle-when-leaving)
(mu4e-headers-search (mu4e-headers-search (format "\"maildir:%s\"" maildir))))
(format "maildir:\"%s\"" maildir))))
(defun mu4e-headers-split-view-grow (&optional n) (defun mu4e-headers-split-view-grow (&optional n)
"In split-view, grow the headers window. "In split-view, grow the headers window.