Mercurial > hg > xemacs-beta
comparison 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 |
comparison
equal
deleted
inserted
replaced
| 19:ac1f612d5250 | 20:859a2309aef8 |
|---|---|
| 160 (define-key map "\M-\t" 'comint-dynamic-complete) | 160 (define-key map "\M-\t" 'comint-dynamic-complete) |
| 161 (define-key map "\M-?" 'comint-dynamic-list-completions) | 161 (define-key map "\M-?" 'comint-dynamic-list-completions) |
| 162 map) | 162 map) |
| 163 "Minibuffer keymap used by shell-command and related commands.") | 163 "Minibuffer keymap used by shell-command and related commands.") |
| 164 | 164 |
| 165 (defvar should-use-dialog-box t | 165 (defvar use-dialog-box t |
| 166 "Variable controlling usage of the dialog box. If nil, the dialog box | 166 "Variable controlling usage of the dialog box. If nil, the dialog box |
| 167 will never be used, even in response to mouse events.") | 167 will never be used, even in response to mouse events.") |
| 168 | 168 |
| 169 (defvar minibuffer-electric-file-name-behavior t | 169 (defvar minibuffer-electric-file-name-behavior t |
| 170 "If non-nil, slash and tilde in certain places cause immediate deletion. | 170 "If non-nil, slash and tilde in certain places cause immediate deletion. |
| 2009 "If non-nil, questions should be asked with a dialog box instead of the | 2009 "If non-nil, questions should be asked with a dialog box instead of the |
| 2010 minibuffer. This looks at `last-command-event' to see if it was a mouse | 2010 minibuffer. This looks at `last-command-event' to see if it was a mouse |
| 2011 event, and checks whether dialog-support exists and the current device | 2011 event, and checks whether dialog-support exists and the current device |
| 2012 supports dialog boxes. | 2012 supports dialog boxes. |
| 2013 | 2013 |
| 2014 The dialog box is totally disabled if the variable `should-use-dialog-box' | 2014 The dialog box is totally disabled if the variable `use-dialog-box' |
| 2015 is set to nil." | 2015 is set to nil." |
| 2016 (and (featurep 'dialog) | 2016 (and (featurep 'dialog) |
| 2017 (device-on-window-system-p) | 2017 (device-on-window-system-p) |
| 2018 should-use-dialog-box | 2018 use-dialog-box |
| 2019 (or force-dialog-box-use | 2019 (or force-dialog-box-use |
| 2020 (button-press-event-p last-command-event) | 2020 (button-press-event-p last-command-event) |
| 2021 (button-release-event-p last-command-event) | 2021 (button-release-event-p last-command-event) |
| 2022 (misc-user-event-p last-command-event)))) | 2022 (misc-user-event-p last-command-event)))) |
| 2023 | |
| 2024 ;;; minibuf.el ends here |