From 0757f6d483c5fa980b843a9fe5228c47fa33a73f Mon Sep 17 00:00:00 2001
From: kaoru <kaoru>
Date: Tue, 2 Jan 2001 14:33:38 +0000
Subject: [PATCH] Added `r-list-name' in `let' bind.

---
 wl/wl-draft.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 452b1b8..c591c9a 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -270,7 +270,7 @@ Return symbol, not list.  Use symbol-name"
 (defun wl-draft-reply (buf no-arg summary-buf)
   ""
 ;;;(save-excursion
-  (let (r-list
+  (let (r-list r-list-name
 	(mime-header-lexical-analyzer '(eword-analyze-quoted-string
 					eword-analyze-domain-literal
 					eword-analyze-comment
-- 
1.7.10.4