summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/lisp-mode.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-09-12 02:42:03 +0000
committerGlenn Morris <rgm@gnu.org>2009-09-12 02:42:03 +0000
commit76314f2c03b15ca84074a0d955f49cbae0e78d2a (patch)
treefa1c9be059929d1f8f1ef042b278f589e0ee8068 /lisp/emacs-lisp/lisp-mode.el
parent6974be68b6a243403ce44033bc0d556b134e75f3 (diff)
downloademacs-76314f2c03b15ca84074a0d955f49cbae0e78d2a.tar.gz
emacs-76314f2c03b15ca84074a0d955f49cbae0e78d2a.tar.bz2
emacs-76314f2c03b15ca84074a0d955f49cbae0e78d2a.zip
(emacs-lisp-mode-map): Add menu entries to elint file and directory.
Remove initialization entry.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mode.el')
-rw-r--r--lisp/emacs-lisp/lisp-mode.el11
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el
index 3360600fbff..29f8d5eb52c 100644
--- a/lisp/emacs-lisp/lisp-mode.el
+++ b/lisp/emacs-lisp/lisp-mode.el
@@ -329,16 +329,19 @@ font-lock keywords will not be case sensitive."
(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"