2016-01-26 Stefan Monnier <monnier@iro.umontreal.ca>

[gnu-emacs-elpa] / ztree-dir.el

diff --git a/ztree-dir.el b/ztree-dir.el
index 89ce47bb86239cbc6eabca6b2dc485cfe8924fdc..d3d3b25f0c89ce9e4be4ad6ddd9686b182064912 100644 (file)
--- a/ztree-dir.el
+++ b/ztree-dir.el
@@ -155,14 +155,14 @@ Otherwise, the ztree window is used to find the file."
     (let ((buf-name (concat "*Directory " path " tree*")))
       (ztree-view buf-name
                   (expand-file-name (substitute-in-file-name path))
-                  'ztree-file-not-hidden
-                  'ztree-insert-buffer-header
-                  'ztree-file-short-name
-                  'file-directory-p
-                  'string-equal
-                  '(lambda (x) (directory-files x 'full))
+                  #'ztree-file-not-hidden
+                  #'ztree-insert-buffer-header
+                  #'ztree-file-short-name
+                  #'file-directory-p
+                  #'string-equal
+                  (lambda (x) (directory-files x 'full))
                   nil                   ; face
-                  'ztree-find-file)     ; action
+                  #'ztree-find-file)    ; action
       (ztreedir-mode))))