diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2001-08-31 17:53:03 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2001-08-31 17:53:03 +0000 |
| commit | 59b7ded8724b7f35c010150a268b0ef0d0342d17 (patch) | |
| tree | a4f948112fa2811b2745acab108d709fcb7db517 /lisp/hi-lock.el | |
| parent | 738421d1b77ad69c48b4b2ba6dd86615982f8060 (diff) | |
| download | emacs-59b7ded8724b7f35c010150a268b0ef0d0342d17.tar.gz | |
Don't call x-popup-menu if display-popup-menus-p returns nil.
Diffstat (limited to 'lisp/hi-lock.el')
| -rw-r--r-- | lisp/hi-lock.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/hi-lock.el b/lisp/hi-lock.el index 86e62eea052..6c7fb5d0c58 100644 --- a/lisp/hi-lock.el +++ b/lisp/hi-lock.el @@ -392,7 +392,7 @@ 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 (vectorp (this-command-keys)) + (if (and (display-popup-menus-p) (vectorp (this-command-keys))) (catch 'snafu (or (x-popup-menu |