From f56709317c95808c0d71fd20d09ee8578eccc1cc Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Thu, 20 Oct 2011 10:19:06 +0200 Subject: [PATCH] * anything.el Attempt to fix crashes on Windows. (anything-hooks): Try to check minibuffer input after possible external functions. --- anything.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/anything.el b/anything.el index 12ca751..17bfeb6 100644 --- a/anything.el +++ b/anything.el @@ -1954,8 +1954,8 @@ hooks concerned are `post-command-hook' and `minibuffer-setup-hook'." (let ((hooks '((post-command-hook anything-check-minibuffer-input) (minibuffer-setup-hook anything-print-error-messages)))) (if (eq setup-or-cleanup 'setup) - (dolist (args hooks) (apply 'add-hook args)) - (dolist (args (reverse hooks)) (apply 'remove-hook args))))) + (dolist (args hooks) (apply #'(lambda (h f) (add-hook h f t)) args)) + (dolist (args (reverse hooks)) (apply 'remove-hook args))))) ;; (@* "Core: clean up") ;;; TODO move -- 2.11.4.GIT