comparison lisp/mail/undigest.el @ 104907:6a35503cf20b

Put autoloads in rmail.el rather than loaddefs.el.
author Glenn Morris <rgm@gnu.org>
date Thu, 10 Sep 2009 06:18:23 +0000
parents ec4427ac212e
children 1d1d5d9bd884
comparison
equal deleted inserted replaced
104906:7018aaffba60 104907:6a35503cf20b
211 (setq error nil) 211 (setq error nil)
212 (message "Message successfully undigestified") 212 (message "Message successfully undigestified")
213 (set-buffer buff) 213 (set-buffer buff)
214 (rmail-swap-buffers-maybe) 214 (rmail-swap-buffers-maybe)
215 (goto-char (point-max)) 215 (goto-char (point-max))
216 ;; FIXME use rmail-count-new-messages.
216 (rmail-set-message-counters) 217 (rmail-set-message-counters)
217 (set-buffer-modified-p t) 218 (set-buffer-modified-p t)
218 (rmail-show-message current) 219 (rmail-show-message current)
219 (rmail-delete-forward) 220 (rmail-delete-forward)
220 (if (rmail-summary-exists) 221 (if (rmail-summary-exists)
310 (rmail-add-mbox-headers)) ; marks as unseen 311 (rmail-add-mbox-headers)) ; marks as unseen
311 (setq error nil) 312 (setq error nil)
312 (set-buffer buff) 313 (set-buffer buff)
313 (rmail-swap-buffers-maybe) 314 (rmail-swap-buffers-maybe)
314 (goto-char (point-max)) 315 (goto-char (point-max))
316 ;; FIXME use rmail-count-new-messages.
315 (rmail-set-message-counters) 317 (rmail-set-message-counters)
316 (set-buffer-modified-p t) 318 (set-buffer-modified-p t)
317 (rmail-show-message current) 319 (rmail-show-message current)
318 (if (rmail-summary-exists) 320 (if (rmail-summary-exists)
319 (rmail-select-summary (rmail-update-summary)))) 321 (rmail-select-summary (rmail-update-summary))))
321 (set-buffer buff) 323 (set-buffer buff)
322 (rmail-show-message current))))) 324 (rmail-show-message current)))))
323 325
324 (provide 'undigest) 326 (provide 'undigest)
325 327
328 ;; Local Variables:
329 ;; generated-autoload-file: "rmail.el"
330 ;; End:
331
326 ;; arch-tag: 3a28b9fb-c1f5-43ef-9278-285f3e4b874d 332 ;; arch-tag: 3a28b9fb-c1f5-43ef-9278-285f3e4b874d
327 ;;; undigest.el ends here 333 ;;; undigest.el ends here