From: hmurata <hmurata>
Date: Sat, 6 Oct 2001 04:39:17 +0000 (+0000)
Subject: * bbdb-wl.el (bbdb-wl-get-petname): Fixed docstring.
X-Git-Tag: wl-2_7_5~7
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=95bfcfe108e4c798711a7008b59cf2e3db7a13e3;p=elisp%2Fwanderlust.git

* bbdb-wl.el (bbdb-wl-get-petname): Fixed docstring.
(bbdb-wl-from-func): Ditto.
---

diff --git a/utils/ChangeLog b/utils/ChangeLog
index 6033947..e499834 100644
--- a/utils/ChangeLog
+++ b/utils/ChangeLog
@@ -1,3 +1,8 @@
+2001-10-06  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* bbdb-wl.el (bbdb-wl-get-petname): Fixed docstring.
+	(bbdb-wl-from-func): Ditto.
+
 2001-09-14  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* bbdb-wl.el (bbdb-wl-extract-field-value-internal): Enclose the
diff --git a/utils/bbdb-wl.el b/utils/bbdb-wl.el
index 45e758f..846fae9 100644
--- a/utils/bbdb-wl.el
+++ b/utils/bbdb-wl.el
@@ -105,7 +105,7 @@
 	  (switch-to-buffer (get-buffer-create bbdb-buffer-name)))))))
 
 (defun bbdb-wl-get-petname (from)
-  "For `wl-summary-get-petname-func'."
+  "For `wl-summary-get-petname-function'."
   (let* ((address (wl-address-header-extract-address from))
 	 (record (bbdb-search-simple nil address)))
     (and record
@@ -113,7 +113,7 @@
 	     (car (bbdb-record-name record))))))
 
 (defun bbdb-wl-from-func (string)
-  "A candidate From field STRING.  For `wl-summary-from-func'."
+  "A candidate From field STRING.  For `wl-summary-from-function'."
   (let ((hit (bbdb-search-simple nil (wl-address-header-extract-address
 				      string)))
 	first-name last-name from-str)