From: morioka <morioka>
Date: Thu, 3 Apr 1997 18:09:35 +0000 (+0000)
Subject: `mime-preview/filter-' -> `mime-view-filter-'.
X-Git-Tag: Hokutetsu-Ishikawa-new~19
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=fe1871257333ddeed37ca682d4fbcefefff6c2a4;p=elisp%2Fsemi.git

`mime-preview/filter-' -> `mime-view-filter-'.
---

diff --git a/mime-image.el b/mime-image.el
index 5a46be6..d865010 100644
--- a/mime-image.el
+++ b/mime-image.el
@@ -9,7 +9,7 @@
 ;; Created: 1995/12/15
 ;;	Renamed: 1997/2/21 from tm-image.el
 ;; Version:
-;;	$Id: mime-image.el,v 0.9 1997-03-16 01:02:03 morioka Exp $
+;;	$Id: mime-image.el,v 0.10 1997-04-03 18:09:35 morioka Exp $
 
 ;; Keywords: image, picture, X-Face, MIME, multimedia, mail, news
 
@@ -118,7 +118,7 @@
 		 (progn
 		   (set-alist 'mime-view-content-filter-alist
 			      ctype
-			      (function mime-preview/filter-for-image))
+			      (function mime-view-filter-for-image))
 		   (set-alist 'mime-view-image-converter-alist
 			      ctype format)
 		   (add-to-list
@@ -144,7 +144,7 @@
 ;;;
 ;;    (for XEmacs 19.12 or later)
 
-(defun mime-preview/filter-for-image (ctype params encoding)
+(defun mime-view-filter-for-image (ctype params encoding)
   (let ((beg (point-min))
 	(end (point-max)))
     (remove-text-properties beg end '(face nil))
@@ -186,7 +186,7 @@
 ;;;
 ;;    (for XEmacs 19.14 or later)
 
-(defun mime-preview/filter-for-application/postscript (ctype params encoding)
+(defun mime-view-filter-for-application/postscript (ctype params encoding)
   (let* ((beg (point-min)) (end (point-max))
 	 (file-base
 	  (make-temp-name (expand-file-name "tm" mime-temp-directory)))
@@ -209,7 +209,7 @@
 
 (set-alist 'mime-view-content-filter-alist
 	   "application/postscript"
-	   (function mime-preview/filter-for-application/postscript))
+	   (function mime-view-filter-for-application/postscript))
 
 (if (featurep 'gif)
     (add-to-list 'mime-view-visible-media-type-list "application/postscript")