(fortran-strip-sqeuence-nos): Doc fix.

2 files changed, 5 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a26f0de6c32..b7851101c00 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2001-02-17  Richard M. Stallman  <rms@gnu.org>
 
+        * progmodes/fortran.el (fortran-strip-sqeuence-nos): Doc fix.
+
         * uniquify.el (uniquify-buffer-name-style): Doc fix.
 
 2001-02-16  Gerd Moellmann  <gerd@gnu.org>
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index a845358a6a2..d83f64763bc 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1789,9 +1789,9 @@ Intended as the value of `fill-paragraph-function'."
     (fortran-indent-line)))
 
 (defun fortran-strip-sqeuence-nos (&optional do-space)
-  "Delete all text after column 72 (assumed to be sequence numbers).
-Also delete trailing whitespace after stripping such text.  Supplying
-prefix arg DO-SPACE prevents stripping the whitespace."
+  "Delete all text in column 72 and up (assumed to be sequence numbers).
+Normally also deletes trailing whitespace after stripping such text.
+Supplying prefix arg DO-SPACE prevents stripping the whitespace."
   (interactive "p")
   (save-excursion
     (goto-char (point-min))