Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 93326:e430e106fa7b
(emacs-lisp-mode-map): Fix predicate.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Thu, 27 Mar 2008 22:15:54 +0000 |
parents | 641cbad340a8 |
children | 8bdec2731742 |
comparison
equal
deleted
inserted
replaced
93325:38e4e1858d46 | 93326:e430e106fa7b |
---|---|
279 (define-key map "\e\C-x" 'eval-defun) | 279 (define-key map "\e\C-x" 'eval-defun) |
280 (define-key map "\e\C-q" 'indent-pp-sexp) | 280 (define-key map "\e\C-q" 'indent-pp-sexp) |
281 (define-key map [menu-bar emacs-lisp] (cons "Emacs-Lisp" menu-map)) | 281 (define-key map [menu-bar emacs-lisp] (cons "Emacs-Lisp" menu-map)) |
282 (define-key menu-map [eldoc] | 282 (define-key menu-map [eldoc] |
283 '(menu-item "Auto-Display Documentation Strings" eldoc-mode | 283 '(menu-item "Auto-Display Documentation Strings" eldoc-mode |
284 :button (:toggle . eldoc-mode) | 284 :button (:toggle . (bound-and-true-p eldoc-mode)) |
285 :help "Display the documentation string for the item under cursor")) | 285 :help "Display the documentation string for the item under cursor")) |
286 (define-key menu-map [checkdoc] | 286 (define-key menu-map [checkdoc] |
287 '(menu-item "Check Documentation Strings" checkdoc | 287 '(menu-item "Check Documentation Strings" checkdoc |
288 :help "Check documentation strings for style requirements")) | 288 :help "Check documentation strings for style requirements")) |
289 (define-key menu-map [profiling] (cons "Profiling" prof-map)) | 289 (define-key menu-map [profiling] (cons "Profiling" prof-map)) |