From: morioka Date: Sun, 7 Jun 1998 14:22:36 +0000 (+0000) Subject: (mime-method-to-display-caesar): Delete code to avoid problem of X-Git-Tag: semi-1_5_2~14 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=fa900682bdd5af2224b6f31d5aa7c566cf6dd6a1;p=elisp%2Fsemi.git (mime-method-to-display-caesar): Delete code to avoid problem of `mime-text-insert-decoded-body'. --- diff --git a/mime-play.el b/mime-play.el index 7e8b00a..e40578c 100644 --- a/mime-play.el +++ b/mime-play.el @@ -615,8 +615,7 @@ saved as binary. Otherwise the region is saved by `write-region'." (let* ((entity (mime-raw-find-entity-from-point start)) (new-name (format "%s-%s" (buffer-name) (reverse (mime-entity-node-id entity)))) - (mother mime-preview-buffer) - (the-buf (current-buffer))) + (mother mime-preview-buffer)) (let ((pwin (or (get-buffer-window mother) (get-largest-window))) (buf (get-buffer-create new-name))) @@ -626,9 +625,7 @@ saved as binary. Otherwise the region is saved by `write-region'." ) (setq buffer-read-only nil) (erase-buffer) - (let ((mime-raw-buffer the-buf)) - (mime-text-insert-decoded-body entity) - ) + (mime-text-insert-decoded-body entity) (mule-caesar-region (point-min) (point-max)) (set-buffer-modified-p nil) (set-buffer mother)