;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; modified by Shuhei KOBAYASHI <shuhei-k@jaist.ac.jp>
-;; Version: $Id: mime-file.el,v 0.1 1997-03-15 20:34:35 morioka Exp $
+;; Version: $Id: mime-file.el,v 0.2 1997-05-12 12:28:38 morioka Exp $
;; Keywords: file, extract, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;;; @ setup
;;;
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/octet-stream")
(method . mime-article/extract-file)
)
'ignore '(method)
'replacement)
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((mode . "extract")
(method . mime-article/extract-file)
)
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Created: 1995/12/7
;; Renamed: 1997/2/27 from tm-pgp.el
-;; Version: $Id: mime-pgp.el,v 0.18 1997-03-27 21:17:25 morioka Exp $
+;; Version: $Id: mime-pgp.el,v 0.19 1997-05-12 12:29:13 morioka Exp $
;; Keywords: PGP, security, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
(set-window-buffer p-win mime-view-buffer)
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/pgp")
(method . mime-article/view-application/pgp)
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "text/x-pgp")
(method . mime-article/view-application/pgp)
))
(delete-file sig-file)
)))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/pgp-signature")
(method . mime-article/check-pgp-signature)
))
(mime-article/view-application/pgp obeg oend cal)
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/pgp-encrypted")
(method . mime-article/decrypt-pgp)
))
(kill-buffer (current-buffer))
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/pgp-keys")
(method . mime-article/add-pgp-keys)
))
;; 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.42 1997-05-09 01:25:26 morioka Exp $
+;; Version: $Id: mime-play.el,v 0.43 1997-05-12 12:30:11 morioka Exp $
;; Keywords: MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
(defun mime-view-play-current-entity (&optional mode)
"Play current entity.
It decodes current entity to call internal or external method. The
-method is selected from variable `mime/content-decoding-condition'.
+method is selected from variable `mime-acting-condition'.
If MODE is specified, play as it. Default MODE is \"play\"."
(interactive)
(or mode
;;;
(defun mime/get-content-decoding-alist (al)
- (get-unified-alist mime/content-decoding-condition al)
+ (get-unified-alist mime-acting-condition al)
)
;; Author: Hiroshi Ueno <zodiac@ibm.net>
;; modified by MORIOKA Tomohiko <morioka@jaist.ac.jp>
;; Renamed: 1997/2/26 from tm-tar.el
-;; Version: $Id: mime-tar.el,v 0.6 1997-05-09 04:19:21 morioka Exp $
+;; Version: $Id: mime-tar.el,v 0.7 1997-05-12 12:30:42 morioka Exp $
;; Keywords: tar, tar+gzip, MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;;; @@ message types to use mime-tar
;;;
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/octet-stream")
(method . mime-decode-message/tar)
(mode . "play") ("type" . "tar")
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/octet-stream")
(method . mime-decode-message/tar)
(mode . "play") ("type" . "tar+gzip")
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/x-gzip")
(method . mime-decode-message/tar)
(mode . "play") ("type" . "tar")
))
-(set-atype 'mime/content-decoding-condition
+(set-atype 'mime-acting-condition
'((type . "application/x-tar")
(method . mime-decode-message/tar)
(mode . "play")
;; Created: 1994/7/13
;; Renamed: 1994/8/31 from tm-body.el
;; Renamed: 1997/02/19 from tm-view.el
-;; Version: $Revision: 0.87 $
+;; Version: $Revision: 0.88 $
;; Keywords: MIME, multimedia, mail, news
;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
;;;
(defconst mime-view-RCS-ID
- "$Id: mime-view.el,v 0.87 1997-05-09 03:05:51 morioka Exp $")
+ "$Id: mime-view.el,v 0.88 1997-05-12 12:27:32 morioka Exp $")
(defconst mime-view-version (get-version-string mime-view-RCS-ID))
;;; @ variables
;;;
-(defvar mime/content-decoding-condition
+(defvar mime-acting-condition
'(((type . "text/plain")
(method "tm-plain" nil 'file 'type 'encoding 'mode 'name)
(mode "play" "print")
"Extract current entity into file (maybe).
It decodes current entity to call internal or external method as
\"extract\" mode. The method is selected from variable
-`mime/content-decoding-condition'."
+`mime-acting-condition'."
(interactive)
(mime-view-play-current-entity "extract")
)
"Print current entity (maybe).
It decodes current entity to call internal or external method as
\"print\" mode. The method is selected from variable
-`mime/content-decoding-condition'."
+`mime-acting-condition'."
(interactive)
(mime-view-play-current-entity "print")
)