(or read-file (file-name-nondirectory default-file))
(file-name-directory default-file)))))))
+(declare-function rmail-update-summary "rmailsum" (&rest ignore))
+
;;; There are functions elsewhere in Emacs that use this function;
;;; look at them before you change the calling method.
;;;###autoload
(rmail-toggle-header))
(if (and (> count 0) (not next-message-p))
(progn
- (error
+ (error "%s"
(save-excursion
(set-buffer rmailbuf)
(format "Only %d message%s appended" num-appended