From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 7 Mar 2006 09:53:30 +0000 (+0000)
Subject: (describe-key): Remove leftover test code.
X-Git-Tag: emacs-pretest-22.0.90~3755
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a78914bca9f3049a92d566ec2921768af1f4acb5;p=emacs.git

(describe-key): Remove leftover test code.
---

diff --git a/lisp/help.el b/lisp/help.el
index 7ee5ee52fea..7c84f44f6a0 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -653,7 +653,6 @@ temporarily enables it to allow getting help on disabled items and buttons."
 	     (setq saved-yank-menu (copy-sequence yank-menu))
 	     (menu-bar-update-yank-menu "(any string)" nil))
 	   (setq key (read-key-sequence "Describe key (or click or menu item): "))
-	   (setq foo key)
 	   (list
 	    key
 	    (prefix-numeric-value current-prefix-arg)
@@ -706,7 +705,6 @@ temporarily enables it to allow getting help on disabled items and buttons."
 	    (prin1 defn)
 	    (princ "\n   which is ")
 	    (describe-function-1 defn)
-	    (setq foo up-event)
 	    (when up-event
 	      (let ((type (event-basic-type up-event))
 		    (hdr "\n\n-------------- up event ---------------\n\n")