* gnus-art.el (gnus-article-edit-done): Widen the article buffer.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 5c2481d94e630a5d1127b90da44d4dfa6dc8fbde..6c361dfa7998d6d026c1a088f13112f745e30853 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2002-02-21  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus-art.el (gnus-article-edit-done): Widen the article buffer.
+
 2002-02-19  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * mm-encode.el (mm-content-transfer-encoding-defaults): Set

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index a65414edbe8c670d92bc10f65955b5723cb70e4c..5afe72d97e6639005e750b96bd4e6d5132d9001f 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4182,9 +4182,9 @@ groups."
 (defun gnus-article-edit-done (&optional arg)
   "Update the article edits and exit."
   (interactive "P")
+  (widen)
   (save-excursion
     (save-restriction
-      (widen)
       (when (article-goto-body)
        (let ((lines (count-lines (point) (point-max)))
              (length (- (point-max) (point)))