Mercurial > emacs
diff lisp/gnus/gnus-sum.el @ 35838:53eebdb81828 zsh-sync-ognus-3
2001-02-01 ShengHuo ZHU <zsh@cs.rochester.edu>
* gnus-score.el (gnus-summary-score-entry): match may be an integer.
* gnus-art.el (gnus-summary-save-in-pipe): Prompt for saving
command if there is not last-saver.
* rfc2047.el (rfc2047-encode): MIME charset is not coding system.
(rfc2047-charset-encoding-alist): Add big5.
* mm-util.el (mm-mime-mule-charset-alist): Preferred MIME names
GB2312 and Big5.
* gnus-score.el (gnus-score-lower-thread): Fix a doc typo.
* gnus-sum.el (gnus-summary-print-article): Remove process mark.
* gnus-sum.el (gnus-summary-print-article): Take one prefix
argument. Allow to print several articles in one file.
* webmail.el (webmail-type-definition): netaddress changes.
author | ShengHuo ZHU <zsh@cs.rochester.edu> |
---|---|
date | Fri, 02 Feb 2001 03:15:52 +0000 |
parents | 6c93e7d6a930 |
children | a35d9c07d074 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Thu Feb 01 23:47:16 2001 +0000 +++ b/lisp/gnus/gnus-sum.el Fri Feb 02 03:15:52 2001 +0000 @@ -1,5 +1,5 @@ ;;; gnus-sum.el --- summary mode commands for Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000 +;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> @@ -7301,8 +7301,7 @@ printer. If FILENAME is a string, save the PostScript image in a file with that name. If FILENAME is a number, prompt the user for the name of the file to save in." - (interactive (list (ps-print-preprint current-prefix-arg) - current-prefix-arg)) + (interactive (list (ps-print-preprint current-prefix-arg))) (dolist (article (gnus-summary-work-articles n)) (gnus-summary-select-article nil nil 'pseudo article) (gnus-eval-in-buffer-window gnus-article-buffer @@ -7325,8 +7324,10 @@ (mail-header-date gnus-current-headers) ")")))) (gnus-run-hooks 'gnus-ps-print-hook) (save-excursion - (ps-print-buffer-with-faces filename)))) - (kill-buffer buffer)))))) + (ps-spool-buffer-with-faces)))) + (kill-buffer buffer)))) + (gnus-summary-remove-process-mark article)) + (ps-despool filename)) (defun gnus-summary-show-article (&optional arg) "Force re-fetching of the current article.