* wl-thread.el (wl-thread-jump-to-msg): Add docstring.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 3317ea1..e297770 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2006-02-14  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * wl-thread.el (wl-thread-jump-to-msg): Add docstring.
+
 2006-02-09  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-message.el (wl-message-flag-indicator): New function.

diff --git a/wl/wl-thread.el b/wl/wl-thread.el
index f397240..3ecb009 100644 (file)
--- a/wl/wl-thread.el
+++ b/wl/wl-thread.el
@@ -293,6 +293,7 @@ ENTITY is returned."
       (cdr (memq (car entity) wl-thread-entity-list)))))
 
 (defun wl-thread-jump-to-msg (&optional number)
+  "Jump to the message with specified number in the current summary."
   (interactive)
   (let ((num (or number
                 (string-to-int