Skip to content

Commit

Permalink
* helm-bookmark.el (helm-highlight-bookmark): Fix helm-find-files bmk…
Browse files Browse the repository at this point in the history
… highlighting.
  • Loading branch information
thierryvolpiatto committed Apr 16, 2015
1 parent 5b7f7f2 commit 9643c8b
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion helm-bookmark.el
Expand Up @@ -546,6 +546,7 @@ Work both with standard Emacs bookmarks and bookmark-extensions.el."
(let ((non-essential t))
(cl-loop for i in bookmarks
for isfile = (bookmark-get-filename i)
for hff = (helm-bookmark-helm-find-files-p i)
for handlerp = (and (fboundp 'bookmark-get-handler)
(bookmark-get-handler i))
for isw3m = (and (fboundp 'helm-bookmark-w3m-bookmark-p)
Expand Down Expand Up @@ -602,7 +603,8 @@ Work both with standard Emacs bookmarks and bookmark-extensions.el."
;; first connection have been established,
;; probably when host is named differently
;; i.e machine/localhost)
(not (file-remote-p isfile))
(or hff
(not (file-remote-p isfile)))
(file-directory-p isfile))
(propertize trunc 'face 'helm-bookmark-directory
'help-echo isfile))
Expand Down

0 comments on commit 9643c8b

Please sign in to comment.