Mercurial > emacs
diff lisp/progmodes/sh-script.el @ 105371:0769a73f1d18
* image-mode.el (image-toggle-display):
* emacs-lisp/elp.el (elp-instrument-function):
* emacs-lisp/advice.el (ad-make-advised-definition):
* emacs-lisp/easy-mmode.el (define-minor-mode):
* net/browse-url.el (browse-url-maybe-new-window):
* progmodes/sh-script.el (sh-learn-buffer-indent):
Pass new argument 'any to `called-interactively-p'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Fri, 02 Oct 2009 00:02:02 +0000 |
| parents | 178c9761642e |
| children | cdd9e1b1a30f |
line wrap: on
line diff
--- a/lisp/progmodes/sh-script.el Thu Oct 01 23:42:39 2009 +0000 +++ b/lisp/progmodes/sh-script.el Fri Oct 02 00:02:02 2009 +0000 @@ -3210,7 +3210,7 @@ ))) ;; Are abnormal hooks considered bad form? (run-hook-with-args 'sh-learned-buffer-hook learned-var-list) - (and (called-interactively-p) + (and (called-interactively-p 'any) (or sh-popup-occur-buffer (> num-diffs 0)) (pop-to-buffer out-buffer)))))