diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2011-08-09 17:55:34 -0400 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2011-08-09 17:55:34 -0400 |
| commit | 8d96c9a4e700ad17921f8d2c90f4244bfa4b98b1 (patch) | |
| tree | 8d8817a98a6c196752edd16ae578f61342a007c8 /lisp/hi-lock.el | |
| parent | 29bbcfa7054e69db0dbe8250af2c809b39ecb54d (diff) | |
| download | emacs-8d96c9a4e700ad17921f8d2c90f4244bfa4b98b1.tar.gz | |
* hi-lock.el (hi-lock-unface-buffer): Fix interactive spec (Bug#7554).
Diffstat (limited to 'lisp/hi-lock.el')
| -rw-r--r-- | lisp/hi-lock.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el index 31d62723281..7b2f5f51260 100644 --- a/lisp/hi-lock.el +++ b/lisp/hi-lock.el @@ -461,7 +461,9 @@ interactive functions. \(See `hi-lock-interactive-patterns'.\) \\<minibuffer-local-must-match-map>Use \\[minibuffer-complete] to complete a partially typed regexp. \(See info node `Minibuffer History'.\)" (interactive - (if (and (display-popup-menus-p) (not last-nonmenu-event)) + (if (and (display-popup-menus-p) + (listp last-nonmenu-event) + use-dialog-box) (catch 'snafu (or (x-popup-menu |