mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(gnus-summary-save-in-folder): Obey mh-lib-progs.

Browse source
This commit is contained in:
Stefan Monnier 2000-10-05 23:23:27 +00:00
parent b262af48f2
commit 0a30c4c8f3
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/gnus/gnus-mh.el
View file

@ -67,7 +67,11 @@ Optional argument FOLDER specifies folder name."
t))))
(errbuf (gnus-get-buffer-create " *Gnus rcvstore*"))
;; Find the rcvstore program.
(exec-path (if mh-lib (cons mh-lib exec-path) exec-path)))
(exec-path (cond
((and (boundp 'mh-lib-progs) mh-lib-progs)
(cons mh-lib-progs exec-path))
(mh-lib (cons mh-lib exec-path))
(t exec-path))))
(with-current-buffer gnus-original-article-buffer
(save-restriction
(widen)