mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

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

Browse source
This commit is contained in:
Stefan Monnier 2002-04-12 03:11:40 +00:00
parent bcb0fd5c82
commit be1ad76795
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/gnus/nnfolder.el
View file

@ -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)