# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1206656154 0
# Node ID e430e106fa7bab8bb5407d274ae156b1cb464281
# Parent  38e4e1858d46a70bf64098a7df703e57443b3e6c
(emacs-lisp-mode-map): Fix predicate.

diff -r 38e4e1858d46 -r e430e106fa7b lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Mar 27 21:15:21 2008 +0000
+++ b/lisp/ChangeLog	Thu Mar 27 22:15:54 2008 +0000
@@ -1,3 +1,7 @@
+2008-03-27  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* emacs-lisp/lisp-mode.el (emacs-lisp-mode-map): Fix predicate.
+
 2008-03-27  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* vc-hooks.el (vc-before-save): Don't prevent saving the file.
diff -r 38e4e1858d46 -r e430e106fa7b lisp/emacs-lisp/lisp-mode.el
--- a/lisp/emacs-lisp/lisp-mode.el	Thu Mar 27 21:15:21 2008 +0000
+++ b/lisp/emacs-lisp/lisp-mode.el	Thu Mar 27 22:15:54 2008 +0000
@@ -281,7 +281,7 @@
     (define-key map [menu-bar emacs-lisp] (cons "Emacs-Lisp" menu-map))
     (define-key menu-map [eldoc]
       '(menu-item "Auto-Display Documentation Strings" eldoc-mode
-		  :button (:toggle . eldoc-mode)
+		  :button (:toggle . (bound-and-true-p eldoc-mode))
 		  :help "Display the documentation string for the item under cursor"))
     (define-key menu-map [checkdoc]
       '(menu-item "Check Documentation Strings" checkdoc