changeset 39065:2428aa3cec41

Don't call x-popup-menu if display-popup-menus-p returns nil.
author Eli Zaretskii <eliz@gnu.org>
date Fri, 31 Aug 2001 17:51:52 +0000
parents c545df001cd2
children ed3408a1ca8b
files lisp/hi-lock.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/hi-lock.el	Fri Aug 31 17:02:20 2001 +0000
+++ b/lisp/hi-lock.el	Fri Aug 31 17:51:52 2001 +0000
@@ -392,7 +392,7 @@
 \\<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