Mercurial > hg > xemacs-beta
diff lisp/prim/minibuf.el @ 20:859a2309aef8 r19-15b93
Import from CVS: tag r19-15b93
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:50:05 +0200 |
parents | 27bc7f280385 |
children | 4103f0995bd7 |
line wrap: on
line diff
--- a/lisp/prim/minibuf.el Mon Aug 13 08:49:44 2007 +0200 +++ b/lisp/prim/minibuf.el Mon Aug 13 08:50:05 2007 +0200 @@ -162,7 +162,7 @@ map) "Minibuffer keymap used by shell-command and related commands.") -(defvar should-use-dialog-box t +(defvar use-dialog-box t "Variable controlling usage of the dialog box. If nil, the dialog box will never be used, even in response to mouse events.") @@ -2011,12 +2011,14 @@ event, and checks whether dialog-support exists and the current device supports dialog boxes. -The dialog box is totally disabled if the variable `should-use-dialog-box' +The dialog box is totally disabled if the variable `use-dialog-box' is set to nil." (and (featurep 'dialog) (device-on-window-system-p) - should-use-dialog-box + use-dialog-box (or force-dialog-box-use (button-press-event-p last-command-event) (button-release-event-p last-command-event) (misc-user-event-p last-command-event)))) + +;;; minibuf.el ends here