(mime-save-content): Use `mime-write-entity-content'.
authormorioka <morioka>
Mon, 29 Jun 1998 00:54:50 +0000 (00:54 +0000)
committermorioka <morioka>
Mon, 29 Jun 1998 00:54:50 +0000 (00:54 +0000)
mime-play.el

index d9ff14d..344b9da 100644 (file)
@@ -313,7 +313,6 @@ window.")
 
 (defun mime-save-content (entity situation)
   (let* ((name (mime-entity-safe-filename entity))
-        (encoding (or (mime-entity-encoding entity) "7bit"))
         (filename (if (and name (not (string-equal name "")))
                       (expand-file-name name
                                         (save-window-excursion
@@ -332,9 +331,7 @@ window.")
     (if (file-exists-p filename)
        (or (yes-or-no-p (format "File %s exists. Save anyway? " filename))
            (error "")))
-    (mime-write-decoded-region (mime-entity-body-start entity)
-                              (mime-entity-body-end entity)
-                              filename encoding)
+    (mime-write-entity-content entity filename)
     ))