From 6c307e68e5b4963994de53c0ebe9d4f5fea59da7 Mon Sep 17 00:00:00 2001 From: morioka Date: Fri, 17 May 1996 08:12:46 +0000 Subject: [PATCH] (rfc822/analyze-comment): Unused local variable `chr' was abolished. --- tl-822.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tl-822.el b/tl-822.el index 182b1e0..acdf430 100644 --- a/tl-822.el +++ b/tl-822.el @@ -30,7 +30,7 @@ (defconst rfc822/RCS-ID - "$Id: tl-822.el,v 7.24 1996-05-15 14:23:50 morioka Exp $") + "$Id: tl-822.el,v 7.25 1996-05-17 08:12:46 morioka Exp $") (defconst rfc822/version (get-version-string rfc822/RCS-ID)) @@ -327,7 +327,7 @@ (eq (elt str 0) ?\() ) (let ((dest "") - chr p ret) + p ret) (setq str (substring str 1)) (catch 'tag (while (not (string-equal str "")) -- 1.7.10.4