From: kaoru <kaoru>
Date: Mon, 6 Jan 2003 04:06:43 +0000 (+0000)
Subject: * wl-draft.el (wl-draft-self-reply-p): Add doc string.
X-Git-Tag: merged-trunk-to-elmo-mark-14~52
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=55189d6df913e51f948d32b0c1958a126adbab81;p=elisp%2Fwanderlust.git

* wl-draft.el (wl-draft-self-reply-p): Add doc string.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index f5f403d..1edc3d2 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-05  NAKAJIMA Mikio  <minakaji@osaka.email.ne.jp>
+
+	* wl-draft.el (wl-draft-self-reply-p): Add doc string.
+
 2003-01-01  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* wl-demo.el (wl-demo-copyright-notice): Add 2003.
diff --git a/wl/wl-draft.el b/wl/wl-draft.el
index 97eeba5..c702ec7 100644
--- a/wl/wl-draft.el
+++ b/wl/wl-draft.el
@@ -314,6 +314,7 @@ e.g.
     subject))
 
 (defun wl-draft-self-reply-p ()
+  "Return t when From address in the current message is user's self one or not."
   (wl-address-user-mail-address-p (or (elmo-field-body "From") "")))
 
 (defun wl-draft-reply (buf with-arg summary-buf)