(mh-complete-word): Doc fix.

diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog
index 0c1a936ff85ba618b90740cf792f4c2a82908895..05f850ee6ed04d8627cadd98e57c67cc1b9c1419 100644 (file)
--- a/lisp/mh-e/ChangeLog
+++ b/lisp/mh-e/ChangeLog
@@ -1,3 +1,14 @@
+2008-06-08  John Paul Wallington  <jpw@pobox.com>
+
+       * mh-acros.el (toplevel): Put `doc-string-elt' properties on
+       `defun-mh' and `defmacro-mh'.
+
+       * mh-alias.el (mh-alias-read-address-map): Define within defvar.
+
+       * mh-comp.el (mh-letter-mode-syntax-table): Define within defvar.
+
+       * mh-letter.el (mh-complete-word): Doc fix.
+
 2008-06-02  John Paul Wallington  <jpw@pobox.com>
 
        * mh-e.el (mh-exec-cmd-env-daemon): Doc fix.

diff --git a/lisp/mh-e/mh-letter.el b/lisp/mh-e/mh-letter.el
index 7eae03f314265e9790360fb75d0305f473369444..15696ecbdf0e62848102fab7256f3cee8923f378 100644 (file)
--- a/lisp/mh-e/mh-letter.el
+++ b/lisp/mh-e/mh-letter.el
@@ -874,7 +874,7 @@ downcasing the field name."
 
 ;;;###mh-autoload
 (defun mh-complete-word (word choices begin end)
-  "Complete WORD at from CHOICES.
+  "Complete WORD from CHOICES.
 Any match found replaces the text from BEGIN to END."
   (let ((completion (try-completion word choices))
         (completions-buffer "*Completions*"))