`mime/output-buffer-name' -> `mime-echo-buffer-name'.
authormorioka <morioka>
Thu, 27 Mar 1997 20:40:03 +0000 (20:40 +0000)
committermorioka <morioka>
Thu, 27 Mar 1997 20:40:03 +0000 (20:40 +0000)
mime-play.el

index a32c047..969fd03 100644 (file)
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/9/26 (separated from tm-view.el)
 ;;     Renamed: 1997/2/21 from tm-play.el
-;; Version: $Id: mime-play.el,v 0.29 1997-03-18 15:17:48 morioka Exp $
+;; Version: $Id: mime-play.el,v 0.30 1997-03-27 20:40:03 morioka Exp $
 ;; Keywords: MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -139,7 +139,7 @@ If MODE is specified, play as it.  Default MODE is \"play\"."
              (setq cal (put-alist 'file file cal))
              (setq args (nconc
                          (list (car method)
-                               mime/output-buffer-name (car method)
+                               mime-echo-buffer-name (car method)
                                )
                          (mime-article/make-method-args cal
                                                         (cdr (cdr method)))
@@ -167,19 +167,19 @@ If MODE is specified, play as it.  Default MODE is \"play\"."
          format))
 
 (defun mime-article/show-output-buffer (&rest forms)
-  (get-buffer-create mime/output-buffer-name)
+  (get-buffer-create mime-echo-buffer-name)
   (let ((the-win (selected-window))
-       (win (get-buffer-window mime/output-buffer-name))
+       (win (get-buffer-window mime-echo-buffer-name))
        )
     (or win
        (if (and mime/output-buffer-window-is-shared-with-bbdb
                 (boundp 'bbdb-buffer-name)
                 (setq win (get-buffer-window bbdb-buffer-name))
                 )
-           (set-window-buffer win mime/output-buffer-name)
+           (set-window-buffer win mime-echo-buffer-name)
          (select-window (get-buffer-window mime-view-buffer))
          (setq win (split-window-vertically (/ (* (window-height) 3) 4)))
-         (set-window-buffer win mime/output-buffer-name)
+         (set-window-buffer win mime-echo-buffer-name)
          ))
     (select-window win)
     (goto-char (point-max))