diff options
| author | Katsumi Yamaoka | 2016-11-21 06:40:01 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2016-11-21 06:40:01 +0000 |
| commit | 5be4b9ff9edae9d36954ef004f2faa7630711179 (patch) | |
| tree | e31de09c8fb69eef2258eac56b03ed9f1c43c5f0 | |
| parent | f332833e21a32709c4c12f794384b5ef6a719735 (diff) | |
| download | emacs-5be4b9ff9edae9d36954ef004f2faa7630711179.tar.gz emacs-5be4b9ff9edae9d36954ef004f2faa7630711179.zip | |
* lisp/gnus/gnus-mh.el (gnus-summary-save-in-folder): Slightly change
the last commit.
| -rw-r--r-- | lisp/gnus/gnus-mh.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/gnus/gnus-mh.el b/lisp/gnus/gnus-mh.el index 84c90be3235..b33402f2ad7 100644 --- a/lisp/gnus/gnus-mh.el +++ b/lisp/gnus/gnus-mh.el | |||
| @@ -85,11 +85,9 @@ Optional argument FOLDER specifies folder name." | |||
| 85 | (widen) | 85 | (widen) |
| 86 | (unwind-protect | 86 | (unwind-protect |
| 87 | (apply | 87 | (apply |
| 88 | 'call-process-region | 88 | #'call-process-region |
| 89 | (append | 89 | (point-min) (point-max) "rcvstore" nil errbuf nil folder |
| 90 | (list (point-min) (point-max) "rcvstore" nil errbuf nil | 90 | gnus-rcvstore-options) |
| 91 | folder) | ||
| 92 | gnus-rcvstore-options)) | ||
| 93 | (set-buffer errbuf) | 91 | (set-buffer errbuf) |
| 94 | (if (zerop (buffer-size)) | 92 | (if (zerop (buffer-size)) |
| 95 | (message "Article saved in folder: %s" folder) | 93 | (message "Article saved in folder: %s" folder) |