From: Pavel Janík <Pavel@Janik.cz>
Date: Wed, 2 Jan 2002 13:19:09 +0000 (+0000)
Subject: (enriched-handle-display-prop): Remove unused variables.
X-Git-Tag: ttn-vms-21-2-B4~17359
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=97f51df1a6a7e15d33ac792f8833f084a2919083;p=emacs.git

(enriched-handle-display-prop): Remove unused variables.
(enriched-mode): Doc fix.
---

diff --git a/lisp/enriched.el b/lisp/enriched.el
index 598d16ab53f..dec6c66e483 100644
--- a/lisp/enriched.el
+++ b/lisp/enriched.el
@@ -172,7 +172,7 @@ etc/enriched.doc in the Emacs distribution directory.
 
 Commands:
 
-\\<enriched-mode-map>\\{enriched-mode-map}"
+\\{enriched-mode-map}"
   nil " Enriched" nil
   (cond ((null enriched-mode)
 	 ;; Turn mode off
@@ -462,8 +462,7 @@ is a list `(CLOSE OPEN)', where CLOSE is a list of annotations to
 close and OPEN a list of annotations to open.  Each of these lists
 has the form `(ANNOTATION PARAM ...)'."
   (let ((annotation "x-display")
-	(param (prin1-to-string (or old new)))
-	close open)
+	(param (prin1-to-string (or old new))))
     (if (null old)
 	(list nil (list annotation param))
       (list (list annotation param)))))