From 0e79054ca8c41a98823d7e9af61b2ab5d93374e6 Mon Sep 17 00:00:00 2001 From: morioka Date: Tue, 18 Mar 1997 08:04:53 +0000 Subject: [PATCH] (mime-view-play-current-entity): New implementation. --- mime-play.el | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/mime-play.el b/mime-play.el index 7423368..f5bf62e 100644 --- a/mime-play.el +++ b/mime-play.el @@ -5,7 +5,7 @@ ;; Author: MORIOKA Tomohiko ;; Created: 1995/9/26 (separated from tm-view.el) ;; Renamed: 1997/2/21 from tm-play.el -;; Version: $Id: mime-play.el,v 0.24 1997-03-17 15:37:40 morioka Exp $ +;; Version: $Id: mime-play.el,v 0.25 1997-03-18 08:04:53 morioka Exp $ ;; Keywords: MIME, multimedia, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -46,15 +46,15 @@ If MODE is specified, play as it. Default MODE is \"play\"." (or mode (setq mode "play") ) - (let ((pc (mime-preview/point-pcinfo (point)))) - (if pc - (let ((the-buf (current-buffer))) + (let ((cinfo (get-text-property (point) 'mime-view-cinfo))) + (if cinfo + (let ((the-buf (current-buffer)) + (raw-buffer (get-text-property (point) 'mime-view-raw-buffer)) + ) (setq mime-preview/after-decoded-position (point)) - (set-buffer (mime::preview-content-info/buffer pc)) - (mime-article/decode-content - (mime::preview-content-info/content-info pc) mode) - (if (eq (current-buffer) - (mime::preview-content-info/buffer pc)) + (set-buffer raw-buffer) + (mime-article/decode-content cinfo mode) + (if (eq (current-buffer) raw-buffer) (progn (set-buffer the-buf) (goto-char mime-preview/after-decoded-position) -- 1.7.10.4