Mercurial > emacs
changeset 104975:b866a533c9f3
(emacs-lisp-mode-map): Add menu entries to elint file and directory.
Remove initialization entry.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sat, 12 Sep 2009 02:42:03 +0000 |
| parents | 646ba543ede9 |
| children | 5db88d7b996f |
| files | lisp/emacs-lisp/lisp-mode.el |
| diffstat | 1 files changed, 7 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el Sat Sep 12 02:41:39 2009 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Sat Sep 12 02:42:03 2009 +0000 @@ -329,16 +329,19 @@ (define-key prof-map [prof-func] '(menu-item "Instrument Function..." elp-instrument-function :help "Instrument a function for profiling")) - (define-key menu-map [lint] (cons "Lint" lint-map)) + (define-key menu-map [lint] (cons "Linting" lint-map)) + (define-key lint-map [lint-di] + '(menu-item "Lint Directory..." elint-directory + :help "Lint a directory")) + (define-key lint-map [lint-f] + '(menu-item "Lint File..." elint-file + :help "Lint a file")) (define-key lint-map [lint-b] '(menu-item "Lint Buffer" elint-current-buffer :help "Lint the current buffer")) (define-key lint-map [lint-d] '(menu-item "Lint Defun" elint-defun :help "Lint the function at point")) - (define-key lint-map [lint-in] - '(menu-item "Lint Initialize" elint-initialize - :help "Lint Initialize")) (define-key menu-map [edebug-defun] '(menu-item "Instrument Function for Debugging" edebug-defun :help "Evaluate the top level form point is in, stepping through with Edebug"