summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/shadow.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2009-11-24 21:36:10 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2009-11-24 21:36:10 +0000
commit32fe5377a352fe554a9bf95f87aaf862abc18794 (patch)
tree460e37fc1e725127bc6730e35c2d3f6233721195 /lisp/emacs-lisp/shadow.el
parent28259cac7074d41fe11603fc3f0954397036583e (diff)
downloademacs-32fe5377a352fe554a9bf95f87aaf862abc18794.tar.gz
(list-load-path-shadows): Setup a major mode
for the displayed buffer (bug#4887).
Diffstat (limited to 'lisp/emacs-lisp/shadow.el')
-rw-r--r--lisp/emacs-lisp/shadow.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/shadow.el b/lisp/emacs-lisp/shadow.el
index 9111dde7de7..5087822444c 100644
--- a/lisp/emacs-lisp/shadow.el
+++ b/lisp/emacs-lisp/shadow.el
@@ -234,6 +234,7 @@ function, `find-emacs-lisp-shadows'."
;; Create the *Shadows* buffer and display shadowings there.
(let ((string (buffer-string)))
(with-current-buffer (get-buffer-create "*Shadows*")
+ (fundamental-mode) ;run after-change-major-mode-hook.
(display-buffer (current-buffer))
(setq buffer-undo-list t
buffer-read-only nil)