merge emacs-23

[gnu-emacs] / lisp / mail / undigest.el

diff --git a/lisp/mail/undigest.el b/lisp/mail/undigest.el
index 2a0ea5ad549aea64d9a1f2b76796b5bb6f78639b..0403c4afc6cf6ade721eb714d45fc051de692456 100644 (file)
--- a/lisp/mail/undigest.el
+++ b/lisp/mail/undigest.el
@@ -1,7 +1,7 @@
 ;;; undigest.el --- digest-cracking support for the RMAIL mail reader
 
 ;; Copyright (C) 1985, 1986, 1994, 1996, 2001, 2002, 2003, 2004, 2005,
-;;   2006, 2007, 2008, 2009  Free Software Foundation, Inc.
+;;   2006, 2007, 2008, 2009, 2010, 2011  Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: mail
@@ -213,6 +213,7 @@ Leaves original message, deleted, before the undigestified messages."
            (set-buffer buff)
            (rmail-swap-buffers-maybe)
            (goto-char (point-max))
+           ;; FIXME use rmail-count-new-messages.
            (rmail-set-message-counters)
            (set-buffer-modified-p t)
            (rmail-show-message current)
@@ -312,6 +313,7 @@ following the containing message."
          (set-buffer buff)
          (rmail-swap-buffers-maybe)
          (goto-char (point-max))
+         ;; FIXME use rmail-count-new-messages.
          (rmail-set-message-counters)
          (set-buffer-modified-p t)
          (rmail-show-message current)
@@ -323,5 +325,9 @@ following the containing message."
 
 (provide 'undigest)
 
+;; Local Variables:
+;; generated-autoload-file: "rmail.el"
+;; End:
+
 ;; arch-tag: 3a28b9fb-c1f5-43ef-9278-285f3e4b874d
 ;;; undigest.el ends here