From: morioka <morioka>
Date: Fri, 14 Mar 1997 05:59:31 +0000 (+0000)
Subject: (mime-preview/filter-for-image): Don't use `assoc-value'.
X-Git-Tag: Hokutetsu-Ishikawa-new~155
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=19c69b31ae209a932f5b639e280940d36517f025;p=elisp%2Fsemi.git

(mime-preview/filter-for-image): Don't use `assoc-value'.
---

diff --git a/mime-image.el b/mime-image.el
index cb32535..431633d 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.4 1997-03-14 05:44:35 morioka Exp $
+;;	$Id: mime-image.el,v 0.5 1997-03-14 05:59:31 morioka Exp $
 
 ;; Keywords: image, picture, X-Face, MIME, multimedia, mail, news
 
@@ -152,7 +152,7 @@
     (remove-text-properties beg end '(face nil))
     (message "Decoding image...")
     (mime-decode-region beg end encoding)
-    (let* ((minor (assoc-value ctype mime-view-image-converter-alist))
+    (let* ((minor (cdr (assoc ctype mime-view-image-converter-alist)))
 	   (gl (image-normalize minor (buffer-string)))
 	   e)
       (delete-region (point-min)(point-max))