2001-08-25 Simon Josefsson <jas@extundo.com>

	* nnfolder.el (nnfolder-save-marks): Don't create directory named
	after group in ~/.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8200d35..d888c46 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-08-25  Simon Josefsson  <jas@extundo.com>
+
+       * nnfolder.el (nnfolder-save-marks): Don't create directory named
+       after group in ~/.
+
 2001-08-25  Simon Josefsson  <jas@extundo.com>
        From Andreas Jaeger  <aj@suse.de>
 

diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el
index 02fd7d3..9b0d176 100644 (file)
--- a/lisp/nnfolder.el
+++ b/lisp/nnfolder.el
@@ -1193,12 +1193,10 @@ This command does not work if you use short group names."
   (let ((file-name-coding-system nnmail-pathname-coding-system)
        (file (nnfolder-group-marks-pathname group)))
     (condition-case err
-       (progn
-         (gnus-make-directory group)
-         (with-temp-file file
-           (erase-buffer)
-           (princ nnfolder-marks (current-buffer))
-           (insert "\n")))
+       (with-temp-file file
+         (erase-buffer)
+         (princ nnfolder-marks (current-buffer))
+         (insert "\n"))
       (error (or (gnus-yes-or-no-p
                  (format "Could not write to %s (%s).  Continue? " file err))
                 (error "Cannot write to %s (%s)" err))))))