(nnfolder-possibly-change-group): Don't assume point-min == 1.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el
index 8ba41d95072..6a4a7f794c5 100644
--- a/lisp/gnus/nnfolder.el
+++ b/lisp/gnus/nnfolder.el
@@ -624,7 +624,8 @@ deleted.  Point is left where the deleted region was."
                 (let ((nnmail-file-coding-system 
                        (or nnfolder-file-coding-system-for-write
                            nnfolder-file-coding-system-for-write)))
-                  (nnmail-write-region 1 1 file t 'nomesg)))
+                  (nnmail-write-region (point-min) (point-min)
+                                       file t 'nomesg)))
               (when (setq nnfolder-current-buffer (nnfolder-read-folder group))
                 (set-buffer nnfolder-current-buffer)
                 (push (list group nnfolder-current-buffer)