Mercurial > emacs
changeset 110253:f81515cea5ce
nnml.el (nnml-save-nov): Remove some debugging-related messages.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Mon, 06 Sep 2010 23:54:07 +0000 |
| parents | c3d46c9f8007 |
| children | 8b5fccbe534c |
| files | lisp/gnus/ChangeLog lisp/gnus/nnml.el |
| diffstat | 2 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Mon Sep 06 22:42:29 2010 +0000 +++ b/lisp/gnus/ChangeLog Mon Sep 06 23:54:07 2010 +0000 @@ -1,3 +1,7 @@ +2010-09-06 Lars Magne Ingebrigtsen <larsi@gnus.org> + + * nnml.el (nnml-save-nov): Remove some debugging-related messages. + 2010-09-06 Katsumi Yamaoka <yamaoka@jpl.org> * pop3.el: Require cl when compiling.
--- a/lisp/gnus/nnml.el Mon Sep 06 22:42:29 2010 +0000 +++ b/lisp/gnus/nnml.el Mon Sep 06 23:54:07 2010 +0000 @@ -784,7 +784,6 @@ (defvar nnml-incremental-nov-buffer-alist nil) (defun nnml-save-incremental-nov () - (message "nnml saving incremental nov...") (save-excursion (while nnml-incremental-nov-buffer-alist (when (buffer-name (cdar nnml-incremental-nov-buffer-alist)) @@ -795,8 +794,7 @@ (set-buffer-modified-p nil) (kill-buffer (current-buffer))) (setq nnml-incremental-nov-buffer-alist - (cdr nnml-incremental-nov-buffer-alist)))) - (message "nnml saving incremental nov...done")) + (cdr nnml-incremental-nov-buffer-alist))))) (defun nnml-open-incremental-nov (group) (or (cdr (assoc group nnml-incremental-nov-buffer-alist)) @@ -863,7 +861,6 @@ buffer))) (defun nnml-save-nov () - (message "nnml saving nov...") (save-excursion (while nnml-nov-buffer-alist (when (buffer-name (cdar nnml-nov-buffer-alist)) @@ -873,8 +870,7 @@ nnml-nov-buffer-file-name nil 'nomesg)) (set-buffer-modified-p nil) (kill-buffer (current-buffer))) - (setq nnml-nov-buffer-alist (cdr nnml-nov-buffer-alist)))) - (message "nnml saving nov...done")) + (setq nnml-nov-buffer-alist (cdr nnml-nov-buffer-alist))))) ;;;###autoload (defun nnml-generate-nov-databases (&optional server)