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

	* nnml.el (nnml-request-update-info): Fix message.
	(nnml-open-marks): Ditto.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8450349..714c518 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2001-08-27  Simon Josefsson  <jas@extundo.com>
 
+       * nnml.el (nnml-request-update-info): Fix message.
+       (nnml-open-marks): Ditto.
+
        * nnfolder.el (nnfolder-request-set-mark) 
        (nnfolder-request-update-info): Don't open group.
        (nnfolder-open-marks): Fix message.

diff --git a/lisp/nnml.el b/lisp/nnml.el
index 5be02f9..f0d7873 100644 (file)
--- a/lisp/nnml.el
+++ b/lisp/nnml.el
@@ -897,6 +897,7 @@ check twice.")
 (deffoo nnml-request-update-info (group info &optional server)
   (nnml-possibly-change-directory group server)
   (unless nnml-marks-is-evil
+    (nnheader-message 6 "Updating marks for %s..." group)
     (nnml-open-marks group server)
     ;; Update info using `nnml-marks'.
     (mapcar (lambda (pred)
@@ -949,7 +950,7 @@ check twice.")
                   (gnus-group-prefixed-name
                    group
                    (gnus-server-to-method (format "nnml:%s" server))))))
-       (nnheader-message 6 "Bootstrapping nnml marks...")
+       (nnheader-message 6 "Bootstrapping marks for %s..." group)
        (setq nnml-marks (gnus-info-marks info))
        (push (cons 'read (gnus-info-read info)) nnml-marks)
        (nnml-save-marks group server)))))