diff options
| author | Juri Linkov | 2005-12-04 02:37:35 +0000 |
|---|---|---|
| committer | Juri Linkov | 2005-12-04 02:37:35 +0000 |
| commit | 0f01161d53d2ed6a4da1036df52685817c611d82 (patch) | |
| tree | c45105c8c3f94446c6c751cff4e37f747d5c042d | |
| parent | e72b3747dc7749992c4bd2cf2a8a3f60229ba956 (diff) | |
| download | emacs-0f01161d53d2ed6a4da1036df52685817c611d82.tar.gz emacs-0f01161d53d2ed6a4da1036df52685817c611d82.zip | |
(idlwave-shell-electric-debug-mode):
Use define-minor-mode instead of easy-mmode-define-minor-mode.
| -rw-r--r-- | lisp/progmodes/idlw-shell.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/progmodes/idlw-shell.el b/lisp/progmodes/idlw-shell.el index 4b646a72f3b..27360a54969 100644 --- a/lisp/progmodes/idlw-shell.el +++ b/lisp/progmodes/idlw-shell.el | |||
| @@ -4188,7 +4188,7 @@ Otherwise, just expand the file name." | |||
| 4188 | (defvar idlwave-shell-electric-debug-read-only) | 4188 | (defvar idlwave-shell-electric-debug-read-only) |
| 4189 | (defvar idlwave-shell-electric-debug-buffers nil) | 4189 | (defvar idlwave-shell-electric-debug-buffers nil) |
| 4190 | 4190 | ||
| 4191 | (easy-mmode-define-minor-mode idlwave-shell-electric-debug-mode | 4191 | (define-minor-mode idlwave-shell-electric-debug-mode |
| 4192 | "Toggle Electric Debug mode. | 4192 | "Toggle Electric Debug mode. |
| 4193 | With no argument, this command toggles the mode. | 4193 | With no argument, this command toggles the mode. |
| 4194 | Non-null prefix argument turns on the mode. | 4194 | Non-null prefix argument turns on the mode. |
| @@ -4196,9 +4196,9 @@ Null prefix argument turns off the mode. | |||
| 4196 | 4196 | ||
| 4197 | When Electric Debug mode is enabled, the many debugging commands are | 4197 | When Electric Debug mode is enabled, the many debugging commands are |
| 4198 | available as single key sequences." | 4198 | available as single key sequences." |
| 4199 | nil | 4199 | nil |
| 4200 | " *Debugging*" | 4200 | " *Debugging*" |
| 4201 | idlwave-shell-electric-debug-mode-map) | 4201 | idlwave-shell-electric-debug-mode-map) |
| 4202 | 4202 | ||
| 4203 | (add-hook | 4203 | (add-hook |
| 4204 | 'idlwave-shell-electric-debug-mode-on-hook | 4204 | 'idlwave-shell-electric-debug-mode-on-hook |