(mime-preview/filter-for-image): Abolish unused local variable
authormorioka <morioka>
Sat, 15 Mar 1997 21:10:43 +0000 (21:10 +0000)
committermorioka <morioka>
Sat, 15 Mar 1997 21:10:43 +0000 (21:10 +0000)
`charset'.

mime-image.el

index ed2139d..601a69d 100644 (file)
@@ -9,7 +9,7 @@
 ;; Created: 1995/12/15
 ;;     Renamed: 1997/2/21 from tm-image.el
 ;; Version:
-;;     $Id: mime-image.el,v 0.7 1997-03-15 21:00:47 morioka Exp $
+;;     $Id: mime-image.el,v 0.8 1997-03-15 21:10:43 morioka Exp $
 
 ;; Keywords: image, picture, X-Face, MIME, multimedia, mail, news
 
 ;;    (for XEmacs 19.12 or later)
 
 (defun mime-preview/filter-for-image (ctype params encoding)
-  (let* ((charset (assoc "charset" params))
-        (beg (point-min)) (end (point-max))
-        )
+  (let ((beg (point-min))
+       (end (point-max)))
     (remove-text-properties beg end '(face nil))
     (message "Decoding image...")
     (mime-decode-region beg end encoding)