summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2008-05-02 17:22:04 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2008-05-02 17:22:04 +0000
commit2bd49e46f4568851ecf267bb79f240c778933c38 (patch)
tree560e0c8ae907589d6880d425b494a5e2def2ac12 /lisp/files.el
parent330b50982d0eadf27f08a857ae98022c0606b42e (diff)
downloademacs-2bd49e46f4568851ecf267bb79f240c778933c38.tar.gz
(minibuffer-with-setup-hook): Allow `fun' expressions rather than only value.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 38eb95fe9bd..221074ae329 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1124,7 +1124,7 @@ Recursive uses of the minibuffer will not be affected."
;; Clear out this hook so it does not interfere
;; with any recursive minibuffer usage.
(remove-hook 'minibuffer-setup-hook ,hook)
- (,fun)))
+ (funcall ,fun)))
(unwind-protect
(progn
(add-hook 'minibuffer-setup-hook ,hook)