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

* mu4e-utils: improve the dir-not-readable guard

Browse Source
This commit is contained in:
djcb
2012-08-23 10:59:03 +03:00
parent 11923c7755
commit b034936271
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
mu4e/mu4e-utils.el
View File

@ -146,7 +146,7 @@ paths."
;; directory 'cur' as leaf; then we we remove from that list all of those that ;; directory 'cur' as leaf; then we we remove from that list all of those that
;; don't have tmp, new sister dirs. And there we're done! ;; don't have tmp, new sister dirs. And there we're done!
;; 1. get all proper subdirs of the current dir, if it is readable ;; 1. get all proper subdirs of the current dir, if it is readable
(when (file-accessible-directory-p path) (when (file-accessible-directory-p (concat path mdir))
(let* ((subdirs (let* ((subdirs
(remove-if (remove-if
(lambda (de) (lambda (de)
@ -260,6 +260,7 @@ provided, function asks for it."
(kar (read-char (concat prompt bmarks)))) (kar (read-char (concat prompt bmarks))))
(mu4e-get-bookmark-query kar))) (mu4e-get-bookmark-query kar)))
(defun mu4e-get-bookmark-query (kar) (defun mu4e-get-bookmark-query (kar)
"Get the corresponding bookmarked query for shortcut character "Get the corresponding bookmarked query for shortcut character
KAR, or raise an error if none is found." KAR, or raise an error if none is found."