Rename `mime-view-kill-buffer' -> `mime-preview-kill-buffer'.

diff --git a/mime-edit.el b/mime-edit.el
index c95f8eb..9584fc2 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -2533,7 +2533,7 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
   "Quitting method for mime-view."
   (let ((temp mime-raw-buffer)
        buf)
-    (mime-view-kill-buffer)
+    (mime-preview-kill-buffer)
     (set-buffer temp)
     (setq buf mime-edit-buffer)
     (kill-buffer temp)

diff --git a/mime-play.el b/mime-play.el
index 837cb51..0df9aec 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -296,7 +296,7 @@ It is registered to variable `mime-view-quitting-method-alist'."
        (win-conf mime::preview/original-window-configuration)
        )
     (kill-buffer mime-raw-buffer)
-    (mime-view-kill-buffer)
+    (mime-preview-kill-buffer)
     (set-window-configuration win-conf)
     (pop-to-buffer mother)
     ))

diff --git a/mime-view.el b/mime-view.el
index 6c6b38e..cacbaa8 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -735,7 +735,7 @@ The compressed face will be piped to this command.")
     (define-key mime-view-mode-map
       "h"        (function mime-preview-show-summary))
     (define-key mime-view-mode-map
-      "\C-c\C-x" (function mime-view-kill-buffer))
+      "\C-c\C-x" (function mime-preview-kill-buffer))
     ;; (define-key mime-view-mode-map
     ;;   "<"        (function beginning-of-buffer))
     ;; (define-key mime-view-mode-map
@@ -1176,7 +1176,7 @@ It calls function registered in variable
        (funcall (cdr r))
       )))
 
-(defun mime-view-kill-buffer ()
+(defun mime-preview-kill-buffer ()
   (interactive)
   (kill-buffer (current-buffer))
   )