From be1ad76795e9530b74a8d77207f84de051f807ba Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 12 Apr 2002 03:11:40 +0000 Subject: [PATCH] (nnfolder-possibly-change-group): Don't assume point-min == 1. --- lisp/gnus/nnfolder.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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) -- 2.39.2