diff options
| author | Richard M. Stallman <rms@gnu.org> | 2001-11-20 23:43:55 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2001-11-20 23:43:55 +0000 |
| commit | ac5231e6bc15558c805a00bc69880ab0ba61cc3a (patch) | |
| tree | 6f378b5e11dc00ee5f1915b00b5018e2b513ef02 /lisp/emacs-lisp/re-builder.el | |
| parent | dda7c01036c240695aec25598ae582800184c8c7 (diff) | |
| download | emacs-ac5231e6bc15558c805a00bc69880ab0ba61cc3a.tar.gz | |
(reb-mode): Don't use define-derived-mode. Call kill-all-local-variables.
Diffstat (limited to 'lisp/emacs-lisp/re-builder.el')
| -rw-r--r-- | lisp/emacs-lisp/re-builder.el | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index 3c98827df23..03b3b7b0ef2 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el @@ -232,9 +232,16 @@ Except for Lisp syntax this is the same as `reb-regexp'.") (define-key reb-mode-map "\C-c\C-b" 'reb-change-target-buffer) (define-key reb-mode-map "\C-c\C-u" 'reb-force-update))) -(define-derived-mode reb-mode nil "RE Builder" - "Major mode for interactively building Regular Expressions." - (reb-mode-common)) +(defun reb-mode () + "Major mode for interactively building Regular Expressions. +\\{reb-mode-map}" + (interactive) + (kill-all-local-variables) + (setq major-mode 'reb-mode + mode-name "RE Builder") + (use-local-map reb-mode-map) + (reb-mode-common) + (run-hooks 'reb-mode-hook)) (define-derived-mode reb-lisp-mode emacs-lisp-mode "RE Builder Lisp" |