diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2009-08-28 18:35:25 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2009-08-28 18:35:25 +0000 |
commit | 1e8eecea4be7cd99c0f194c9249495d60dfc584b (patch) | |
tree | 15f985e069c170ba3f0bfe93efdd5ed8f5f08333 /lisp/emacs-lisp/re-builder.el | |
parent | dd4fbf5672391842e40119168935a3fa59463cb4 (diff) | |
download | emacs-1e8eecea4be7cd99c0f194c9249495d60dfc584b.tar.gz |
* arc-mode.el (archive-mode):
* emacs-lisp/re-builder.el (re-builder-unload-function):
Protect against the default value of `major-mode' being nil.
Diffstat (limited to 'lisp/emacs-lisp/re-builder.el')
-rw-r--r-- | lisp/emacs-lisp/re-builder.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index ed45bd65304..31f7d8da49e 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el @@ -720,7 +720,7 @@ If SUBEXP is non-nil mark only the corresponding sub-expressions." (remove-hook 'kill-buffer-hook 'reb-kill-buffer t) (when (reb-mode-buffer-p) (reb-delete-overlays) - (funcall (default-value 'major-mode))))) + (funcall (or (default-value 'major-mode) 'fundamental-mode))))) ;; continue standard unloading nil) |