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

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7288b2f1880293fe52efdb983bccdec87ef5bf33..b1e9ff4d527a36e2a63754f47de31237f68ab1d7 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 b2d2936177cc413875625776d3ac7b62577fa493..fae3dad43a17438482c8b8998129084c938017c3 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4185,9 +4185,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)))