Commit ac44263a authored by Glenn Morris's avatar Glenn Morris
Browse files

Rename shadow-mode.

* lisp/emacs-lisp/shadow.el (shadow-font-lock-keywords)
(load-path-shadows-mode, list-load-path-shadows): Rename shadow-mode to
load-path-shadows-mode, update references.
parent fcf2d385
2010-10-07 Glenn Morris <rgm@gnu.org>
* emacs-lisp/shadow.el (shadow-font-lock-keywords)
(load-path-shadows-mode, list-load-path-shadows): Rename shadow-mode to
load-path-shadows-mode, update references.
2010-10-07 Stefan Monnier <monnier@iro.umontreal.ca> 2010-10-07 Stefan Monnier <monnier@iro.umontreal.ca>
   
* emacs-lisp/smie.el (smie-bnf-classify): New function. * emacs-lisp/smie.el (smie-bnf-classify): New function.
......
...@@ -156,9 +156,9 @@ See the documentation for `list-load-path-shadows' for further information." ...@@ -156,9 +156,9 @@ See the documentation for `list-load-path-shadows' for further information."
`((,(format "hides \\(%s.*\\)" `((,(format "hides \\(%s.*\\)"
(file-name-directory (locate-library "simple.el"))) (file-name-directory (locate-library "simple.el")))
. (1 font-lock-warning-face))) . (1 font-lock-warning-face)))
"Keywords to highlight in `shadow-mode'.") "Keywords to highlight in `load-path-shadows-mode'.")
(define-derived-mode shadow-mode fundamental-mode "Shadow" (define-derived-mode load-path-shadows-mode fundamental-mode "LP-Shadows"
"Major mode for load-path shadows buffer." "Major mode for load-path shadows buffer."
(set (make-local-variable 'font-lock-defaults) (set (make-local-variable 'font-lock-defaults)
'((shadow-font-lock-keywords))) '((shadow-font-lock-keywords)))
...@@ -263,7 +263,7 @@ function, `find-emacs-lisp-shadows'." ...@@ -263,7 +263,7 @@ function, `find-emacs-lisp-shadows'."
(let ((string (buffer-string))) (let ((string (buffer-string)))
(with-current-buffer (get-buffer-create "*Shadows*") (with-current-buffer (get-buffer-create "*Shadows*")
(display-buffer (current-buffer)) (display-buffer (current-buffer))
(shadow-mode) ; run after-change-major-mode-hook (load-path-shadows-mode) ; run after-change-major-mode-hook
(let ((inhibit-read-only t)) (let ((inhibit-read-only t))
(erase-buffer) (erase-buffer)
(insert string) (insert string)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment