From: morioka <morioka>
Date: Fri, 13 Mar 1998 19:08:41 +0000 (+0000)
Subject: Rename `mime-view-quitting-method-for-gnus' ->
X-Git-Tag: gnus-6_7-tomo-199811302358~112
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4032bdb949590755e189b41b049e256501430709;p=elisp%2Fgnus.git-

Rename `mime-view-quitting-method-for-gnus' ->
`mime-preview-quitting-method-for-gnus'.
---

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index dd5ffbc..3f2254b 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3250,7 +3250,7 @@ forbidden in URL encoding."
 It is registered to variable `mime-view-content-header-filter-alist'."
   (eword-decode-header default-mime-charset))
 
-(defun mime-view-quitting-method-for-gnus ()
+(defun mime-preview-quitting-method-for-gnus ()
   (if (not gnus-show-mime)
       (mime-preview-kill-buffer))
   (delete-other-windows)
@@ -3269,11 +3269,12 @@ It is registered to variable `mime-view-content-header-filter-alist'."
 	   (function mime-text-decode-buffer))
 
 (set-alist 'mime-preview-quitting-method-alist
-	   'gnus-original-article-mode #'mime-view-quitting-method-for-gnus)
+	   'gnus-original-article-mode
+	   #'mime-preview-quitting-method-for-gnus)
 
 (set-alist 'mime-view-show-summary-method
 	   'gnus-original-article-mode
-	   (function mime-view-quitting-method-for-gnus))
+	   #'mime-preview-quitting-method-for-gnus)
 
 
 ;;; @ end