(nnmbox-create-mbox): Don't assume point-min == 1.

a76a4381 · Stefan Monnier · 2f85befd · a76a4381
Commit a76a4381 authored Apr 12, 2002 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/gnus/nnmbox.el lisp/gnus/nnmbox.el +2 -1

No files found.
--- a/lisp/gnus/nnmbox.el
+++ b/lisp/gnus/nnmbox.el
@@ -523,7 +523,8 @@
    (let ((nnmail-file-coding-system
 	   (or nnmbox-file-coding-system-for-write
 	       nnmbox-file-coding-system)))
-      (nnmail-write-region 1 1 nnmbox-mbox-file t 'nomesg))))
+      (nnmail-write-region (point-min) (point-min)
+			   nnmbox-mbox-file t 'nomesg))))

 (defun nnmbox-read-mbox ()
  (nnmail-activate 'nnmbox)