From ac5231e6bc15558c805a00bc69880ab0ba61cc3a Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 20 Nov 2001 23:43:55 +0000 Subject: [PATCH] (reb-mode): Don't use define-derived-mode. Call kill-all-local-variables. --- lisp/emacs-lisp/re-builder.el | 13 ++++++++++--- 1 file 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" -- 2.39.2