diff options
Diffstat (limited to 'lisp/gnus/gnus-mh.el')
| -rw-r--r-- | lisp/gnus/gnus-mh.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-mh.el b/lisp/gnus/gnus-mh.el index 123350c8f12..f7377120a4a 100644 --- a/lisp/gnus/gnus-mh.el +++ b/lisp/gnus/gnus-mh.el @@ -1,5 +1,6 @@ ;;; gnus-mh.el --- mh-e interface for Gnus -;; Copyright (C) 1994,95,96,97,98 Free Software Foundation, Inc. +;; Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000 +;; Free Software Foundation, Inc. ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet> ;; Lars Magne Ingebrigtsen <larsi@gnus.org> @@ -66,8 +67,8 @@ Optional argument FOLDER specifies folder name." t)))) (errbuf (gnus-get-buffer-create " *Gnus rcvstore*")) ;; Find the rcvstore program. - (exec-path (if mh-lib-progs (cons mh-lib-progs exec-path) exec-path))) - (gnus-eval-in-buffer-window gnus-original-article-buffer + (exec-path (if mh-lib (cons mh-lib exec-path) exec-path))) + (with-current-buffer gnus-original-article-buffer (save-restriction (widen) (unwind-protect |