+1998-07-16 Katsumi Yamaoka <yamaoka@jpl.org>
+
+ * WEMI: Version 1.8.4 (Hara) released.
+
+1998-07-14 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-ui-en.sgml, mime-ui-ja.sgml (message/partial sending): New
+ section.
+
+ * mime-edit.el (mime-edit-split-blind-field-regexp): Add
+ DOC-string; change to user option.
+
+\f
+1998-07-11 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * REMI: Version 1.8.4 (Takaoka) released.
+
+1998-07-09 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-play.el: Reduce `mime-acting-situation-example-list' while
+ it is bigger than `mime-acting-situation-example-list-max-size'.
+
+1998-07-08 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-edit.el (mime-edit-preview-message): Use `mime-view-buffer'
+ instead of `mime-view-mode'.
+
+\f
+1998-07-08 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * REMI: Version 1.8.3 (Ecch~-Nakagawa) released.
+
+ * mime-play.el (mime-delq-null-situation): Add new optional
+ argument `ignored-value'.
+ (mime-raw-play-entity): Add new optional argument
+ `ignored-method'; add `ignore-examples' to acting-situation.
+ (mime-detect-content): Specify `ignore-examples' of
+ acting-situation as `ignore-examples' of `mime-raw-play-entity';
+ specify `mime-detect-content' as `ignored-method' of
+ `mime-raw-play-entity'.
+
+1998-07-08 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-view.el (mime-preview-extract-current-entity): Change
+ interface to add `ignore-examples'.
+ (mime-preview-print-current-entity): Likewise.
+
+ * mime-play.el (mime-acting-situation-example-list-max-size): New
+ variable.
+ (mime-reduce-acting-situation-examples): New function.
+ (mime-preview-play-current-entity): Change interface to add
+ `ignore-examples'.
+ (mime-raw-play-entity): Add new optional argument
+ `ignore-examples'. Reduce `mime-acting-situation-example-list'
+ when loading example file.
+
+\f
+1998-07-08 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * REMI: Version 1.8.2 (N~machi) released.
+
+1998-07-07 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-play.el (mime-acting-situation-example-list): New variable;
+ abolish `mime-acting-situation-examples'.
+ (mime-save-acting-situation-examples): Modify for
+ `mime-acting-situation-example-list'.
+ (mime-compare-situation-with-example): New function.
+ (mime-raw-play-entity): Change algorithm to compare with
+ acting-situation-examples.
+ (mime-store-message/partial-piece): Use `mime-view-buffer' instead
+ of `mime-view-mode'.
+
+1998-07-06 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-play.el (mime-preview-play-current-entity): Fix problem
+ when `mode' is omitted with non-interactive mode (maybe for button
+ dispatcher).
+
+\f
+1998-07-06 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * REMI: Version 1.8.1 (Fushiki) released.
+
+1998-07-05 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-ui-en.texi, mime-ui-en.sgml: New files.
+
+ * mime-ui-ja.sgml: Modify node names about MIME-Edit.
+ (file-type specification): Fix typo.
+
+1998-07-04 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-play.el (mime-file-content-type-alist): Add "Standard
+ MIDI".
+
+ * mime-play.el (mime-detect-content): Fixed.
+
+1998-07-03 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-play.el (mime-activate-mailcap-method): Check filename is
+ null string.
+
+1998-07-03 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * mime-ui-ja.sgml, mime-ui-ja.texi: New files; delete
+ mime-view-ja.sgml and mime-view-ja.texi.
+
+\f
1998-07-01 Katsumi Yamaoka <yamaoka@jpl.org>
* WEMI: Version 1.8.2 (Katahama) released.
* semi-def.el: Don't require 'browse-url.
Abolish `mime-browse-add-url-buttons-maybe' and `mime-browse-url'.
- (mime-browse-url-function): New function.
+ (mime-browse-url-function): New variable.
(mime-add-url-buttons): Renamed from `mime-browse-add-url-button'.
Use `mime-browse-url-function'.
#
PACKAGE = wemi
-VERSION = 1.8.2
+VERSION = 1.8.4
SHELL = /bin/sh
MAKE = make
$(RM) /tmp/$(PACKAGE)-$(VERSION)/ftp.in
cd /tmp; $(TAR) cvzf $(PACKAGE)-$(VERSION).tar.gz $(PACKAGE)-$(VERSION)
cd /tmp; $(RM) -r $(PACKAGE)-$(VERSION)
- sed "s/VERSION/$(VERSION)/" < ftp.in > ftp
+ sed "s/VERSION/$(VERSION)/" < ftp.in \
+ | sed "s/PACKAGE/$(PACKAGE)/" > ftp
1.8.0 Toyama \e$(BIY;3\e(B ; = JR \e$(B9b;3K\@~!"IY;39A@~\e(B
1.8.1 Kureha \e$(B8b1)\e(B
1.8.2 Kosugi \e$(B>.?y\e(B
------ Ecch\e-Dþ-Daimon\e-A \e$(B1[CfBgLg\e(B
------ Takaoka \e$(B9b2,\e(B ; = JR \e$(BI98+@~!">kC<@~\e(B
+1.8.3 Ecch\e-Dþ-Daimon\e-A \e$(B1[CfBgLg\e(B
+1.8.4 Takaoka \e$(B9b2,\e(B ; = JR \e$(BI98+@~!">kC<@~\e(B
: : :
------- Higashi-Kanazawa \e$(BEl6bBt\e(B
------- Kanazawa \e$(B6bBt\e(B ; <=> \e$(BKLN&E4F;\e(B \e$(BKLE46bBt\e(B
1.8.0 Mishima \e$B;0Eg\e(B ; = \e$B0KF&H":,E4F;\e(B
1.8.1 Numazu \e$B>BDE\e(B ; = JR \e$(B8fEB>l@~\e(B
1.8.2 Katahama \e$BJRIM\e(B
------ Hara \e$B86\e(B
+1.8.4 Hara \e$B86\e(B
----- Higashi-Tagonoura \e$BElED;R%N1:\e(B
----- Yoshiwara \e$B5H86\e(B ; = \e$B3YFnE4F;\e(B
----- Fuji \e$BIY;N\e(B ; = JR \e$B?H1d@~\e(B
1.6.0 Amaharashi \e$(B1+@2\e(B
1.8.0 Ecch\e-Dþ-Kokubu \e$(B1[Cf9qJ,\e(B\e-A
1.8.1 Fushiki \e$(BIzLZ\e(B ; <=> \e$B%&%i%8%*%9%C%H%C%/9RO)\e(B
-------- Noumachi \e$(BG=D.\e(B
-------- Ecch\e-Dþ-Nakagawa \e$(B1[CfCf@n\e(B\e-A
- (Takaoka) (\e$(B9b2,\e(B) ; = JR \e$(BKLN&K\@~!">kC<@~\e(B
+1.8.2 N\e-Dòmachi\e-A \e$(BG=D.\e(B
+1.8.3 Ecch\e-Dþ-Nakagawa\e-A \e$(B1[CfCf@n\e(B
+1.8.4 Takaoka \e$(B9b2,\e(B ; = JR \e$(BKLN&K\@~!">kC<@~\e(B
[etc.]
(defconst mime-edit-split-ignored-field-regexp
"\\(^Content-\\|^Subject:\\|^Mime-Version:\\|Message-Id:\\)")
-(defvar mime-edit-split-blind-field-regexp
- "\\(^[BDFbdf]cc:\\|^cc:[ \t]*$\\)")
+(defcustom mime-edit-split-blind-field-regexp
+ "\\(^[BDFbdf]cc:\\|^cc:[ \t]*$\\)"
+ "*Regular expression to match field-name to be ignored when split sending."
+ :group 'mime-edit
+ :type 'regexp)
(defvar mime-edit-split-message-sender-alist nil)
(concat "^" (regexp-quote separator) "$"))
(replace-match "")
)
- (mime-view-mode)
+ (mime-view-buffer)
))
(defun mime-edit-quitting-method ()
(error (defvar bbdb-buffer-name nil)))
)
-(defvar mime-acting-situation-examples nil)
+(defvar mime-acting-situation-example-list nil)
+
+(defvar mime-acting-situation-example-list-max-size 16)
(defun mime-save-acting-situation-examples ()
(let* ((file mime-acting-situation-examples-file)
(insert "\n;; This file is generated automatically by "
mime-view-version-string "\n\n")
(insert ";;; Code:\n\n")
- (pp `(setq mime-acting-situation-examples
- ',mime-acting-situation-examples)
+ (pp `(setq mime-acting-situation-example-list
+ ',mime-acting-situation-example-list)
(current-buffer))
(insert "\n;;; "
(file-name-nondirectory file)
(add-hook 'kill-emacs-hook 'mime-save-acting-situation-examples)
-
+(defun mime-reduce-acting-situation-examples ()
+ (let* ((rest mime-acting-situation-example-list)
+ (min-example (car rest))
+ (min-score (cdr min-example)))
+ (while rest
+ (let* ((example (car rest))
+ (score (cdr example)))
+ (cond ((< score min-score)
+ (setq min-score score
+ min-example example)
+ )
+ ((= score min-score)
+ (if (<= (length (car example))(length (car min-example)))
+ (setq min-example example)
+ ))
+ ))
+ (setq rest (cdr rest)))
+ (setq mime-acting-situation-example-list
+ (delq min-example mime-acting-situation-example-list))
+ (setq min-example (car min-example))
+ (let ((examples mime-acting-situation-example-list)
+ (max-score 0)
+ max-examples)
+ (while examples
+ (let* ((ret (mime-compare-situation-with-example min-example
+ (caar examples)))
+ (ret-score (car ret)))
+ (cond ((> ret-score max-score)
+ (setq max-score ret-score
+ max-examples (list (cdr ret)))
+ )
+ ((= ret-score max-score)
+ (setq max-examples (cons (cdr ret) max-examples))
+ )))
+ (setq examples (cdr examples)))
+ (while max-examples
+ (let* ((example (car max-examples))
+ (cell (assoc example mime-acting-situation-example-list)))
+ (if cell
+ (setcdr cell (1+ (cdr cell)))
+ (setq mime-acting-situation-example-list
+ (cons (cons example 0)
+ mime-acting-situation-example-list))
+ ))
+ (setq max-examples (cdr max-examples))
+ ))))
+
+
;;; @ content decoder
;;;
(defvar mime-preview-after-decoded-position nil)
-(defun mime-preview-play-current-entity (&optional mode)
+(defun mime-preview-play-current-entity (&optional ignore-examples mode)
"Play current entity.
It decodes current entity to call internal or external method. The
method is selected from variable `mime-acting-condition'.
+If IGNORE-EXAMPLES (C-u prefix) is specified, this function ignores
+`mime-acting-situation-example-list'.
If MODE is specified, play as it. Default MODE is \"play\"."
- (interactive (list "play"))
+ (interactive "P")
(let ((entity (get-text-property (point) 'mime-view-entity)))
(if entity
(let ((the-buf (current-buffer))
(raw-buffer (mime-entity-buffer entity)))
(setq mime-preview-after-decoded-position (point))
(set-buffer raw-buffer)
- (mime-raw-play-entity entity mode)
+ (mime-raw-play-entity entity (or mode "play") nil ignore-examples)
(when (eq (current-buffer) raw-buffer)
(set-buffer the-buf)
(goto-char mime-preview-after-decoded-position)
)))
)
-(defsubst mime-delq-null-situation (situations field)
+(defsubst mime-delq-null-situation (situations field
+ &optional ignored-value)
(let (dest)
(while situations
- (let ((situation (car situations)))
- (if (assq field situation)
- (setq dest (cons situation dest))
- ))
+ (let* ((situation (car situations))
+ (cell (assq field situation)))
+ (if cell
+ (or (eq (cdr cell) ignored-value)
+ (setq dest (cons situation dest))
+ )))
(setq situations (cdr situations)))
dest))
-(defun mime-raw-play-entity (entity &optional mode situation)
+(defun mime-compare-situation-with-example (situation example)
+ (let ((example (copy-alist example))
+ (match 0))
+ (while situation
+ (let* ((cell (car situation))
+ (key (car cell))
+ (ecell (assoc key example)))
+ (when ecell
+ (if (equal cell ecell)
+ (setq match (1+ match))
+ (setq example (delq ecell example))
+ ))
+ )
+ (setq situation (cdr situation))
+ )
+ (cons match example)
+ ))
+
+(defun mime-raw-play-entity (entity &optional mode situation ignore-examples
+ ignored-method)
"Play entity specified by ENTITY.
It decodes the entity to call internal or external method. The method
is selected from variable `mime-acting-condition'. If MODE is
(if mode
(setq situation (cons (cons 'mode mode) situation))
)
+ (if ignore-examples
+ (or (assq 'ignore-examples situation)
+ (setq situation
+ (cons (cons 'ignore-examples ignore-examples) situation)))
+ )
(setq ret
- (or (ctree-match-calist mime-acting-situation-examples situation)
- (ctree-match-calist-partially mime-acting-situation-examples
- situation)
- situation))
- (setq ret
- (or (mime-delq-null-situation
- (ctree-find-calist mime-acting-condition ret
- mime-view-find-every-acting-situation)
- 'method)
- (mime-delq-null-situation
- (ctree-find-calist mime-acting-condition situation
- mime-view-find-every-acting-situation)
- 'method)
- ))
+ (mime-delq-null-situation
+ (ctree-find-calist mime-acting-condition situation
+ mime-view-find-every-acting-situation)
+ 'method ignored-method))
+ (or ignore-examples
+ (if (cdr ret)
+ (let ((rest ret)
+ (max-score 0)
+ max-escore
+ max-examples
+ max-situations)
+ (while rest
+ (let ((situation (car rest))
+ (examples mime-acting-situation-example-list))
+ (while examples
+ (let* ((ret
+ (mime-compare-situation-with-example
+ situation (caar examples)))
+ (ret-score (car ret)))
+ (cond ((> ret-score max-score)
+ (setq max-score ret-score
+ max-escore (cdar examples)
+ max-examples (list (cdr ret))
+ max-situations (list situation))
+ )
+ ((= ret-score max-score)
+ (cond ((> (cdar examples) max-escore)
+ (setq max-escore (cdar examples)
+ max-examples (list (cdr ret))
+ max-situations (list situation))
+ )
+ ((= (cdar examples) max-escore)
+ (setq max-examples
+ (cons (cdr ret) max-examples))
+ (or (member situation max-situations)
+ (setq max-situations
+ (cons situation max-situations)))
+ )))))
+ (setq examples (cdr examples))))
+ (setq rest (cdr rest)))
+ (when max-situations
+ (setq ret max-situations)
+ (while max-examples
+ (let* ((example (car max-examples))
+ (cell
+ (assoc example mime-acting-situation-example-list)))
+ (if cell
+ (setcdr cell (1+ (cdr cell)))
+ (setq mime-acting-situation-example-list
+ (cons (cons example 0)
+ mime-acting-situation-example-list))
+ ))
+ (setq max-examples (cdr max-examples))
+ )))))
(cond ((cdr ret)
(setq ret (select-menu-alist
"Methods"
situation)))
ret)))
(setq ret (mime-sort-situation ret))
- (ctree-set-calist-strictly 'mime-acting-situation-examples ret)
+ (add-to-list 'mime-acting-situation-example-list (cons ret 0))
)
(t
(setq ret (car ret))
(let ((method (cdr (assoc 'method situation)))
(name (mime-entity-safe-filename entity)))
(setq name
- (if name
+ (if (and name (not (string= name "")))
(expand-file-name name mime-temp-directory)
(make-temp-name
(expand-file-name "EMI" mime-temp-directory))
;;;
(defvar mime-file-content-type-alist
- '(("JPEG" image jpeg)
- ("GIF" image gif)
+ '(("JPEG" image jpeg)
+ ("GIF" image gif)
+ ("Standard MIDI" audio midi)
)
"*Alist of \"file\" output patterns vs. corresponding media-types.
Each element looks like (REGEXP TYPE SUBTYPE).
(if (search-forward (concat filename ": ") nil t)
(let ((rest mime-file-content-type-alist))
(while (not (let ((cell (car rest)))
- (if (looking-at (car cell))
- (setq type (nth 1 cell)
- subtype (nth 2 cell))
- )))
+ (if cell
+ (if (looking-at (car cell))
+ (setq type (nth 1 cell)
+ subtype (nth 2 cell))
+ )
+ t)))
(setq rest (cdr rest))))))
(if type
(mime-raw-play-entity
- entity "play"
+ entity nil
(put-alist 'type type
(put-alist 'subtype subtype
- (mime-entity-situation entity))))
+ (del-alist 'method
+ (copy-alist situation))))
+ (cdr (assq 'ignore-examples situation))
+ 'mime-detect-content)
))
)))
(erase-buffer)
(as-binary-input-file (insert-file-contents file))
(setq major-mode 'mime-show-message-mode)
- (mime-view-mode mother)
+ (mime-view-buffer (current-buffer) nil mother)
)
(set-window-buffer pwin
(save-excursion
))
(save-window-excursion
(setq major-mode 'mime-show-message-mode)
- (mime-view-mode mother)
+ (mime-view-buffer (current-buffer) nil mother)
)
(let ((pwin (or (get-buffer-window mother)
- (get-largest-window)
- ))
+ (get-largest-window)))
(pbuf (save-excursion
(set-buffer full-buf)
mime-preview-buffer)))
(insert-file-contents file)
(eval-buffer)
;; format check
- (or (eq (car mime-acting-situation-examples) 'type)
- (setq mime-acting-situation-examples nil))
+ (condition-case nil
+ (let ((i 0))
+ (while (and (> (length mime-acting-situation-example-list)
+ mime-acting-situation-example-list-max-size)
+ (< i 16))
+ (mime-reduce-acting-situation-examples)
+ (setq i (1+ i))
+ ))
+ (error (setq mime-acting-situation-example-list nil)))
)
(kill-buffer buffer))))
+++ /dev/null
-<!doctype sinfo system>
-<head>
-<title>SEMI 1.6 MIME-View \e$B@bL@=q\e(B
-<author>\e$B<i2,\e(B \e$BCNI'\e(B <mail>morioka@jaist.ac.jp</mail>
-<date>1998/06/15
-
-<toc>
-</head>
-
-<body>
-
-<abstract>
-<p>
-This file documents MIME-View, a MIME Viewer for GNU Emacs.
-<p>
-GNU Emacs \e$BMQ$N\e(B MIME Viewer \e$B$G$"$k\e(B MIME-View \e$B$K$D$$$F@bL@$7$^$9!#\e(B
-</abstract>
-
-
-<h1> MIME-View \e$B$C$F2?!)\e(B
-<node> Introduction
-<p>
-MIME-View \e$B$O\e(B GNU Emacs \e$B$GF0:n$9$kHFMQE*$J\e(B MIME viewer \e$B$G$9!#\e(B
-<p>
-MIME-View \e$B$O\e(B MIME message \e$B$r1\Mw$9$k$?$a$NMxMQ<T3&LL\e(B (user interface)
-\e$B$N3K$G$"$j!"$3$N>e$G\e(B presentation-method \e$B$H8F$P$l$kI=<($r:n$k%W%m%0%i%`\e(B
-\e$B$rF0$+$7$?$j!"\e(Bacting-method \e$B$H8F$P$l$k\e(B entity \e$B$N=hM}%W%m%0%i%`$rF0$+$9\e(B
-\e$B$3$H$,2DG=$G!"$5$^$6$^$J<oN`$N\e(B entity \e$B$r07$&;v$,$G$-$k$h$&$K$J$C$F$$$^$9!#\e(B
-
-
-<h1> MIME-View \e$B35@b\e(B
-<node> Overview
-<p>
-Internet \e$B$NEE;R=q4J!&%M%C%H%K%e!<%9$J$I$N=qLL\e(B (message) \e$B$NI=8=7A<0$O\e(B
-STD 11 \e$B$K4p$E$$$F$$$^$9!#\e(BSTD 11 \e$B$N=qLLK\BN\e(B (message body) \e$B$O9T$rM#0l$N\e(B
-\e$B9=B$$H$9$k4J0WJ8LL\e(B (plain text) \e$B$G$"$j!"J8;zId9f$b\e(B us-ascii \e$B$HDj$a$i$l\e(B
-\e$B$F$$$^$9!#<B:]$K$O!"J8;zId9f$r\e(B us-ascii \e$B$NBe$o$j$K$=$N8@8l7w$GMQ$$$i$l\e(B
-\e$B$kJ8;zId9f$H$7$?!XCO0h2=$5$l$?\e(B STD 11\e$B!Y=qLL$bMQ$$$i$l$F$-$^$7$?$,!"$3\e(B
-\e$B$N>l9g$b=qLL$NJ8;zId9f$O#1$D$G$9!#$3$N$?$a!"MxMQ<T3&LL\e(B (Message User
-Agent) \e$B$O!"$7$P$7$P!"\e(Bbyte \e$BNs\e(B = us-ascii \e$BJ8;zNs!"$J$$$7$O!"\e(Bbyte \e$BNs\e(B = \e$B$=\e(B
-\e$B$N8@8l7w$GMQ$$$kJ8;zId9f$NJ8;zNs$N$h$&$K8+Jo$7$F$-$^$7$?!#\e(B
-<p>
-\e$B$7$+$7$J$,$i!"\e(BMIME \e$B$G$O=qLL$O\e(B entity \e$B$rC10L$H$9$kLZ9=B$$K$J$j!"$^$?!"\e(B
-\e$B#1$D$N=qLL$GJ#?t$NJ8;zId9f$rMQ$$$k$3$H$,$G$-$^$9!#$^$?!"\e(Bentity \e$B$NFbMF\e(B
-\e$B$OJ8LL$d3($N$h$&$JC1=c$KI=<(2DG=$J$b$N$@$1$G$J$/!"2;@<$dF02h$J$I$N0lDj\e(B
-\e$B;~4V:F@8$5$l$k$h$&$J$b$N$dFCDj$N%"%W%j%1!<%7%g%s$N%G!<%?$d%W%m%0%i%`$N\e(B
-\e$B%=!<%9!"$"$k$$$O!"\e(Bftp \e$B$d\e(B mail service \e$B$NMxMQK!$d\e(B URL \e$B$H$$$C$?7A$GI=$5\e(B
-\e$B$l$?30It;2>H$J$I$N$5$^$6$^$J$b$N$,9M$($i$^$9!#$3$N$?$a!"I=<($@$1$r9M$(\e(B
-\e$B$F$$$?\e(B STD 11 \e$B$K$*$1$kMxMQ<T3&LL$NC1=c$J1dD9$G$O\e(B MIME \e$B$NA4$F$N5!G=$r07\e(B
-\e$B$&$3$H$O$G$-$^$;$s!#$D$^$j!"\e(BMIME \e$B$N7A<0$K9g$o$;$FI|9f$9$k$@$1$G$OIT==\e(B
-\e$BJ,$G$"$j!"MxMQ<T$H$NBPOCE*$J:F@8=hM}$r9MN8$9$kI,MW$,$"$j$^$9!#\e(BMIME \e$B=q\e(B
-\e$BLL$N7A<0$O<+F0=hM}$,$7$d$9$/@_7W$5$l$F$$$^$9$,!"\e(BMIME \e$B=qLL$K4^$^$l$kFb\e(B
-\e$BMF$NCf$K$O%;%-%e%j%F%#!<>e$NLdBj$+$i<+F0=hM}$r$9$k$Y$-$G$J$$$b$N$,$"$j!"\e(B
-\e$B$3$&$$$C$?$b$N$N:F@8$K4X$7$F$OMxMQ<T$NH=CG$r6D$0$h$&$K@_7W$5$l$k$Y$-$G\e(B
-\e$B$7$g$&!#7k6I!"\e(BMIME \e$B=qLL$r07$&$?$a$K$O\e(B STD 11 \e$B$*$h$S\e(B MIME \e$B$N9=J8$G5-=R\e(B
-
\e$B$5$l$?%a%C%;!<%8$N>pJs8r49MQI=8=$H$=$N2r<a7k2L$G$"$kI=<(2hLL$d:F@8Ey$N
\e(B
-\e$B=hM}$r6hJL$7$F9M$($kI,MW$,$"$j$^$9!#$^$?!"MxMQ<T$H$NBPOCE*$J:F@8=hM}$,\e(B
-\e$BI,MW$G$9!#\e(B
-<p>
-\e$B$3$N$?$a!"\e(BMIME-View \e$B$O#1$D$N=qLL$KBP$7$F!">pJs8r49MQI=8=$r3JG<$9$k\e(B
-mime-raw-buffer \e$B$HI=<(MQI=8=$r3JG<$9$k\e(B mime-preview-buffer \e$B$N#2$D$N\e(B
-buffer \e$B$rMQ$$$^$9!#\e(B
-<p>
-MIME-View \e$B$O\e(B mime-preview-buffer \e$B$KBP$7$F\e(B mime-view-mode \e$B$H$$$&\e(B MIME
-message \e$B$r1\Mw$9$k$?$a$N\e(B mode \e$B$rDs6!$7$^$9!#MxMQ<T$O$3$3$G3F\e(B entity \e$B$K\e(B
-\e$BBP$7$FA`:n$r9T$&$3$H$,$G$-$^$9!#\e(B
-
-
-<h1> mime-preview-buffer \e$B$N2hLL9=@.\e(B
-<node> MIME-Preview
-<p>
-mime-view-mode \e$B$G$O3F\e(B entity \e$B$KBP$7$F\e(B
-<p>
-<verb>
- [entity-button]
- (header)
-
- (body)
- (separator)
-</verb>
-<p>
-<noindent>
-\e$B$H$$$&>pJs$rI=<($7$^$9!#$3$l$i$O>r7o$K=>$C$F\e(B design \e$B$rJQ99$7$?$j!"I=<(\e(B
-\e$B$rM^@)$9$k$3$H$b$G$-$^$9!#\e(B
-<p>
-\e$B0J2<$K!"I=<(Nc$r<($7$^$9!#\e(B
-
-
-<verb>
-From: morioka@jaist.ac.jp (\e$B<i2,\e(B \e$BCNI'\e(B / MORIOKA Tomohiko)
-Subject: Re:
\e$B<ALd!)
\e(B
-Newsgroups: zxr.message.mime
-Date: 22 Oct 93 11:02:44
-Mime-Version: 1.0
-Organization: Japan Advanced Institute of Science and Technology,
- Ishikawa, Japan
-
-[1 (text/plain)]
- MIME-Edit mode \e$B$K$*$1$k!"\e(BMIME message \e$B$N:n$jJ}!#\e(B
-
- C-c C-x ? \e$B$r2!$9$H\e(B help \e$B$,=P$F$/$k!#\e(B
-
-C-c C-x C-t insert a text message.
-C-c C-x TAB insert a (binary) file.
-C-c C-x C-e insert a reference to external body.
-C-c C-x C-v insert a voice message.
-C-c C-x C-y insert a mail or news message.
-C-c C-x RET insert a mail message.
-C-c C-x C-s insert a signature file at end.
-C-c C-x t insert a new MIME tag.
-C-c C-x a enclose as multipart/alternative.
-C-c C-x p enclose as multipart/parallel.
-C-c C-x m enclose as multipart/mixed.
-C-c C-x d enclose as multipart/digest.
-C-c C-x s enclose as PGP signed.
-C-c C-x e enclose as PGP encrypted.
-C-c C-x C-k insert PGP public key.
-C-c C-x C-p preview editing MIME message.
-...
-
-\e$B$C$FLu$G!"\e(BC-c C-x C-i \e$B$r2!$7$F!"A^F~$7$?$$\e(B binary file \e$B$r;XDj$7$^$9!#\e(B
-
- binary file \e$B$N\e(B MIME encoding \e$B$K$O!"IaDL!"\e(BBase64 \e$B$r;XDj$7$^$9!#\e(B
-
-[2 (image/gif)]
-
-[3 (text/plain)]
-
- \e$B$3$s$JIw$K!"3(F~$j\e(B message \e$B$N$G$->e$,$j!#\e(B
-
-\e$B".".".".".".".".".".".\e(B \e$B%m%7%"%s!&%F%#!<$r0lGU!#\e(B \e$B".".".".".".".".".".".\e(B
-\e$B".".".".".\e(B \e$B!y\e(B \e$B%8%c%`$G$O$J$/%^!<%^%l!<%I$G$b$J$/K*L*$G\e(B \e$B!y\e(B \e$B".".".".".\e(B
-\e$B".".".".".\e(B \e$B'.'0'2$$'0','!\e(B \e$B'4'0'.'0'7'*','0\e(B \e$B".".".".".\e(B
-\e$B".".".".".".".\e(B Internet E-mail: <morioka@jaist.ac.jp> \e$B".".".".".".".\e(B
-</verb>
-
-
-<h2> entity-button
-<node> entity-button
-<p>
-<concept>entity-button</concept> \e$B$O\e(B entity \e$B$N@hF,$K$"$C$F!"$=$N\e(B entity
-\e$B$K4X$9$kBg$^$+$J>pJs$rI=<($9$kItJ,$G$9!#\e(B
-<p>
-\e$BI8=`$G$O\e(B
-
-<verb>
- [1.3 test (text/plain)]
-</verb>
-
-<noindent>
-\e$B$N$h$&$J46$8$KI=<($5$l$^$9!#\e(B
-<p>
-\e$B:G=i$N?t;z$O\e(B message \e$BCf$N$3$N\e(B entity \e$B$N0LCV$r@aHV9f$N$h$&$KI=$7$?$b$N\e(B
-\e$B$G!"\e(B<concept>entity-number</concept> \e$B$H8F$S$^$9!#\e(B
-<p>
-\e$B#2HVL\$NJ8;zNs$OI=Bj$rI=$7$^$9!#$3$N>pJs$O!"\e(B
-
-<ol>
-<li>Content-Description field \e$B$b$7$/$O\e(B Subject field \e$B$K=q$+$l$?I=Bj\e(B
-<li>Content-Disposition field \e$B$N\e(B filename parameter \e$B$K=q$+$l$?\e(B file \e$BL>\e(B
-<li>Content-Type field \e$B$N\e(B name parameter \e$B$K=q$+$l$?\e(B file \e$BL>\e(B
-<li> uuencode \e$B$N>l9g$N\e(B file \e$BL>\e(B
-</ol>
-
-<noindent>
-\e$B$+$i:n$j$^$9!#$I$l$bB8:_$7$J$$>l9g$O6uGr$,I=<($5$l$^$9!#\e(B
-<p>
-\e$B#3HVL\$N3g8L$NCf$N>pJs$O$=$N\e(B entity \e$B$N\e(B media-type/subtype \e$B$rI=$7$^$9!#\e(B
-\e$BHs\e(B MIME entity \e$B$N>l9g!"\e(B<code>nil</code> \e$B$,I=<($5$l$^$9!#\e(B
-<p>
-\e$B$3$N\e(B entity-button \e$B$O\e(B entity \e$B$NFbMF$r>]D'$9$k\e(B icon \e$B$N$h$&$JLr3d$r2L$?\e(B
-\e$B$7$^$9!#Nc$($P!"\e(B
-
-<verb>
- [2 (image/gif)]
-</verb>
-
-<noindent>
-\e$B$N>e$G\e(B <kbd>v</kbd> \e$B$r2!$;$P$3$3$KF~$C$F$$$k3($,I=<($5$l$^$9!#\e(B
-<p>
-\e$B$^$?!"\e(Bmouse \e$BA`:n$,2DG=$J>l9g!"\e(Bentity-button \e$B$rBh#2%\%?%s!J\e(B3 button
-mouse \e$B$N>l9g!"Cf1{$N%\%?%s!K$G2!$;$P!"F1MM$K$=$N3($,I=<($5$l$^$9!#\e(B
-
-
-<h2> entity-header
-<node> entity-header
-<p>
-<concept>entity-header</concept> \e$B$O$"$k\e(B entity \e$B$N\e(B header \e$B$rI=<($9$kIt\e(B
-\e$BJ,$G$9!J!V$=$N$^$^$d$s$1!W$C$FE\$i$J$$$G!#$=$&$$$&$b$s$J$s$G$9!K!#\e(B
-
-
-<h2> entity-body
-<node> entity-body
-<p>
-<concept>entity-body</concept> \e$B$O\e(B part \e$B$NFbMF$rI=<($9$kItJ,$G$9!#\e(B
-<p>
-\e$B$3$l$b$R$M$j$,B-$j$J$$$G$9$,!"$^$"!"$=$&$$$&$b$s$G$9!#\e(B
-<p>
-\e$B$H$O$$$(!"<B:]$K$O>/$7$R$M$C$F$^$9!#\e(B
-<p>
-text entity \e$B$N>l9g$O\e(B charset \e$B$K1~$8$F\e(B code \e$BJQ49$7$?$j$7$^$9$7!"\e(BXEmacs
-\e$B$G$O\e(B image entity \e$B$rJQ49$7$J$$$H$$$1$J$$$7!#\e(B
-<p>
-\e$B>\$7$/$O$^$?8e$G!#\e(B
-
-
-<h1> mime-preview-buffer \e$B$G$NA`:n\e(B
-<node> mime-view-mode
-<p>
-mime-preview-buffer \e$B$K$O0J2<$N5!G=$,$"$j$^$9!#\e(B
-<p>
-<kl>
-<kt>u
-<kd>
-\e$B>e$N\e(B part \e$B$KLa$k!J\e(Bmessage \e$B$N0lHV>e$N\e(B part \e$B$G$3$l$r9T$J$&$H\e(B Summary
-mode \e$B$KLa$k\e(B (*1)\e$B!K\e(B
-</kd>
-<kt>p<kd>\e$BA0$N\e(B part \e$B$K0\F0$9$k\e(B
-</kd>
-<kt>M-TAB<kd>\e$BA0$N\e(B part \e$B$K0\F0$9$k\e(B
-</kd>
-<kt>n<kd>\e$B<!$N\e(B part \e$B$K0\F0$9$k\e(B
-</kd>
-<kt>TAB<kd>\e$B<!$N\e(B part \e$B$K0\F0$9$k\e(B
-</kd>
-<kt>SPC<kd>scroll up \e$B$9$k\e(B
-</kd>
-<kt>M-SPC<kd>scroll down \e$B$9$k\e(B
-</kd>
-<kt>DEL<kd>scroll down \e$B$9$k\e(B
-</kd>
-<kt>RET<kd>\e$B<!$N9T$K0\F0$9$k\e(B
-</kd>
-<kt>M-RET<kd>\e$BA0$N9T$K0\F0$9$k\e(B
-</kd>
-<kt>v<kd>part \e$B$r:F@8$9$k\e(B (*2)
-</kd>
-<kt>e<kd>part \e$B$+$i\e(B file \e$B$r<h$j=P$9\e(B (*2)
-</kd>
-<kt>C-c C-p<kd>part \e$B$r0u:~$9$k\e(B (*2)
-</kd>
-<kt>mouse-button-2
-<kd>
-preview-buffer \e$BCf$N\e(B mouse button \e$B$r5/F0$9$k\e(B
-<p>
-content-button \e$B$r2!$;$P!"$=$N\e(B part \e$B$,:F@8$5$l$k\e(B(*2)
-<p>
-URL-button \e$B$r2!$;$P!"$=$N\e(B WWW browser \e$B$,5/F0$5$l$k\e(B
-</kd>
-</kl>
-<p>
-<memo title="\e$BCm0U\e(B">
-<p>
-(*1) MUA \e$B$G\e(B mime-view \e$B$N@_Dj$r$7$F$$$J$$>l9g!"\e(BSummary mode \e$B$K$OLa$j$^\e(B
-\e$B$;$s!#\e(B
-<p>
-(*2) \e$B<B:]$NF0:n$OBP1~$9$k\e(B method \e$B$K0M$j$^$9!#\e(B
-</memo>
-
-
-<h1> \e$B35G0:w0z\e(B
-<node> Concept Index
-
-<cindex>
-
-
-<h1> \e$B4X?t:w0z\e(B
-<node> Function Index
-
-<findex>
-
-
-<h1> \e$BJQ?t:w0z\e(B
-<node> Variable Index
-
-<vindex>
-
-</body>
+++ /dev/null
-\input texinfo.tex
-@setfilename mime-view-ja.info
-@settitle{SEMI 1.6 MIME-View \e$B@bL@=q\e(B}
-@titlepage
-@title SEMI 1.6 MIME-View \e$B@bL@=q\e(B
-@author \e$B<i2,\e(B \e$BCNI'\e(B <morioka@@jaist.ac.jp>
-@subtitle 1998/06/15
-@end titlepage
-@node Top, Introduction, (dir), (dir)
-@top SEMI 1.6 MIME-View \e$B@bL@=q\e(B
-
-@ifinfo
-
-This file documents MIME-View, a MIME Viewer for GNU Emacs.@refill
-
-GNU Emacs \e$BMQ$N\e(B MIME Viewer \e$B$G$"$k\e(B MIME-View \e$B$K$D$$$F@bL@$7$^$9!#\e(B
-@end ifinfo
-
-@menu
-* Introduction:: MIME-View \e$B$C$F2?!)\e(B
-* Overview:: MIME-View \e$B35@b\e(B
-* MIME-Preview:: mime-preview-buffer \e$B$N2hLL9=@.\e(B
-* mime-view-mode:: mime-preview-buffer \e$B$G$NA`:n\e(B
-* Concept Index:: \e$B35G0:w0z\e(B
-* Function Index:: \e$B4X?t:w0z\e(B
-* Variable Index:: \e$BJQ?t:w0z\e(B
-@end menu
-
-@node Introduction, Overview, Top, Top
-@chapter MIME-View \e$B$C$F2?!)\e(B
-
-MIME-View \e$B$O\e(B GNU Emacs \e$B$GF0:n$9$kHFMQE*$J\e(B MIME viewer \e$B$G$9!#\e(B@refill
-
-MIME-View \e$B$O\e(B MIME message \e$B$r1\Mw$9$k$?$a$NMxMQ<T3&LL\e(B (user interface)
-\e$B$N3K$G$"$j!"$3$N>e$G\e(B presentation-method \e$B$H8F$P$l$kI=<($r:n$k%W%m%0%i%`\e(B
-\e$B$rF0$+$7$?$j!"\e(Bacting-method \e$B$H8F$P$l$k\e(B entity \e$B$N=hM}%W%m%0%i%`$rF0$+$9\e(B
-\e$B$3$H$,2DG=$G!"$5$^$6$^$J<oN`$N\e(B entity \e$B$r07$&;v$,$G$-$k$h$&$K$J$C$F$$$^$9!#\e(B
-
-
-@node Overview, MIME-Preview, Introduction, Top
-@chapter MIME-View \e$B35@b\e(B
-
-Internet \e$B$NEE;R=q4J!&%M%C%H%K%e!<%9$J$I$N=qLL\e(B (message) \e$B$NI=8=7A<0$O\e(B STD
-11 \e$B$K4p$E$$$F$$$^$9!#\e(BSTD 11 \e$B$N=qLLK\BN\e(B (message body) \e$B$O9T$rM#0l$N9=B$$H\e(B
-\e$B$9$k4J0WJ8LL\e(B (plain text) \e$B$G$"$j!"J8;zId9f$b\e(B us-ascii \e$B$HDj$a$i$l$F$$$^$9!#\e(B
-\e$B<B:]$K$O!"J8;zId9f$r\e(B us-ascii \e$B$NBe$o$j$K$=$N8@8l7w$GMQ$$$i$l$kJ8;zId9f$H\e(B
-\e$B$7$?!XCO0h2=$5$l$?\e(B STD 11\e$B!Y=qLL$bMQ$$$i$l$F$-$^$7$?$,!"$3$N>l9g$b=qLL$N\e(B
-\e$BJ8;zId9f$O#1$D$G$9!#$3$N$?$a!"MxMQ<T3&LL\e(B (Message User Agent) \e$B$O!"$7$P$7\e(B
-\e$B$P!"\e(Bbyte \e$BNs\e(B = us-ascii \e$BJ8;zNs!"$J$$$7$O!"\e(Bbyte \e$BNs\e(B = \e$B$=$N8@8l7w$GMQ$$$kJ8\e(B
-\e$B;zId9f$NJ8;zNs$N$h$&$K8+Jo$7$F$-$^$7$?!#\e(B@refill
-
-\e$B$7$+$7$J$,$i!"\e(BMIME \e$B$G$O=qLL$O\e(B entity \e$B$rC10L$H$9$kLZ9=B$$K$J$j!"$^$?!"#1\e(B
-\e$B$D$N=qLL$GJ#?t$NJ8;zId9f$rMQ$$$k$3$H$,$G$-$^$9!#$^$?!"\e(Bentity \e$B$NFbMF$OJ8\e(B
-\e$BLL$d3($N$h$&$JC1=c$KI=<(2DG=$J$b$N$@$1$G$J$/!"2;@<$dF02h$J$I$N0lDj;~4V:F\e(B
-\e$B@8$5$l$k$h$&$J$b$N$dFCDj$N%"%W%j%1!<%7%g%s$N%G!<%?$d%W%m%0%i%`$N%=!<%9!"\e(B
-\e$B$"$k$$$O!"\e(Bftp \e$B$d\e(B mail service \e$B$NMxMQK!$d\e(B URL \e$B$H$$$C$?7A$GI=$5$l$?30It;2\e(B
-\e$B>H$J$I$N$5$^$6$^$J$b$N$,9M$($i$^$9!#$3$N$?$a!"I=<($@$1$r9M$($F$$$?\e(B STD
-11 \e$B$K$*$1$kMxMQ<T3&LL$NC1=c$J1dD9$G$O\e(B MIME \e$B$NA4$F$N5!G=$r07$&$3$H$O$G$-\e(B
-\e$B$^$;$s!#$D$^$j!"\e(BMIME \e$B$N7A<0$K9g$o$;$FI|9f$9$k$@$1$G$OIT==J,$G$"$j!"MxMQ\e(B
-\e$B<T$H$NBPOCE*$J:F@8=hM}$r9MN8$9$kI,MW$,$"$j$^$9!#\e(BMIME \e$B=qLL$N7A<0$O<+F0=h\e(B
-\e$BM}$,$7$d$9$/@_7W$5$l$F$$$^$9$,!"\e(BMIME \e$B=qLL$K4^$^$l$kFbMF$NCf$K$O%;%-%e%j\e(B
-\e$B%F%#!<>e$NLdBj$+$i<+F0=hM}$r$9$k$Y$-$G$J$$$b$N$,$"$j!"$3$&$$$C$?$b$N$N:F\e(B
-\e$B@8$K4X$7$F$OMxMQ<T$NH=CG$r6D$0$h$&$K@_7W$5$l$k$Y$-$G$7$g$&!#7k6I!"\e(BMIME
-\e$B=qLL$r07$&$?$a$K$O\e(B STD 11 \e$B$*$h$S\e(B MIME \e$B$N9=J8$G5-=R$5$l$?%a%C%;!<%8$N>pJs\e(B
-
\e$B8r49MQI=8=$H$=$N2r<a7k2L$G$"$kI=<(2hLL$d:F@8Ey$N=hM}$r6hJL$7$F9M$($kI,MW
\e(B
-\e$B$,$"$j$^$9!#$^$?!"MxMQ<T$H$NBPOCE*$J:F@8=hM}$,I,MW$G$9!#\e(B@refill
-
-\e$B$3$N$?$a!"\e(BMIME-View \e$B$O#1$D$N=qLL$KBP$7$F!">pJs8r49MQI=8=$r3JG<$9$k\e(B
-mime-raw-buffer \e$B$HI=<(MQI=8=$r3JG<$9$k\e(B mime-preview-buffer \e$B$N#2$D$N\e(B
-buffer \e$B$rMQ$$$^$9!#\e(B@refill
-
-MIME-View \e$B$O\e(B mime-preview-buffer \e$B$KBP$7$F\e(B mime-view-mode \e$B$H$$$&\e(B MIME
-message \e$B$r1\Mw$9$k$?$a$N\e(B mode \e$B$rDs6!$7$^$9!#MxMQ<T$O$3$3$G3F\e(B entity \e$B$K\e(B
-\e$BBP$7$FA`:n$r9T$&$3$H$,$G$-$^$9!#\e(B
-
-
-@node MIME-Preview, mime-view-mode, Overview, Top
-@chapter mime-preview-buffer \e$B$N2hLL9=@.\e(B
-
-mime-view-mode \e$B$G$O3F\e(B entity \e$B$KBP$7$F\e(B@refill
-
-@example
- [entity-button]
- (header)
-
- (body)
- (separator)
-@end example
-
-@noindent
-\e$B$H$$$&>pJs$rI=<($7$^$9!#$3$l$i$O>r7o$K=>$C$F\e(B design \e$B$rJQ99$7$?$j!"I=<(\e(B
-\e$B$rM^@)$9$k$3$H$b$G$-$^$9!#\e(B
-
-\e$B0J2<$K!"I=<(Nc$r<($7$^$9!#\e(B
-
-
-@example
-From: morioka@@jaist.ac.jp (\e$B<i2,\e(B \e$BCNI'\e(B / MORIOKA Tomohiko)
-Subject: Re:
\e$B<ALd!)
\e(B
-Newsgroups: zxr.message.mime
-Date: 22 Oct 93 11:02:44
-Mime-Version: 1.0
-Organization: Japan Advanced Institute of Science and Technology,
- Ishikawa, Japan
-
-[1 (text/plain)]
- MIME-Edit mode \e$B$K$*$1$k!"\e(BMIME message \e$B$N:n$jJ}!#\e(B
-
- C-c C-x ? \e$B$r2!$9$H\e(B help \e$B$,=P$F$/$k!#\e(B
-
-C-c C-x C-t insert a text message.
-C-c C-x TAB insert a (binary) file.
-C-c C-x C-e insert a reference to external body.
-C-c C-x C-v insert a voice message.
-C-c C-x C-y insert a mail or news message.
-C-c C-x RET insert a mail message.
-C-c C-x C-s insert a signature file at end.
-C-c C-x t insert a new MIME tag.
-C-c C-x a enclose as multipart/alternative.
-C-c C-x p enclose as multipart/parallel.
-C-c C-x m enclose as multipart/mixed.
-C-c C-x d enclose as multipart/digest.
-C-c C-x s enclose as PGP signed.
-C-c C-x e enclose as PGP encrypted.
-C-c C-x C-k insert PGP public key.
-C-c C-x C-p preview editing MIME message.
-...
-
-\e$B$C$FLu$G!"\e(BC-c C-x C-i \e$B$r2!$7$F!"A^F~$7$?$$\e(B binary file \e$B$r;XDj$7$^$9!#\e(B
-
- binary file \e$B$N\e(B MIME encoding \e$B$K$O!"IaDL!"\e(BBase64 \e$B$r;XDj$7$^$9!#\e(B
-
-[2 (image/gif)]
-
-[3 (text/plain)]
-
- \e$B$3$s$JIw$K!"3(F~$j\e(B message \e$B$N$G$->e$,$j!#\e(B
-
-\e$B".".".".".".".".".".".\e(B \e$B%m%7%"%s!&%F%#!<$r0lGU!#\e(B \e$B".".".".".".".".".".".\e(B
-\e$B".".".".".\e(B \e$B!y\e(B \e$B%8%c%`$G$O$J$/%^!<%^%l!<%I$G$b$J$/K*L*$G\e(B \e$B!y\e(B \e$B".".".".".\e(B
-\e$B".".".".".\e(B \e$B'.'0'2$$'0','!\e(B \e$B'4'0'.'0'7'*','0\e(B \e$B".".".".".\e(B
-\e$B".".".".".".".\e(B Internet E-mail: <morioka@@jaist.ac.jp> \e$B".".".".".".".\e(B
-@end example
-
-
-
-@menu
-* entity-button::
-* entity-header::
-* entity-body::
-@end menu
-
-@node entity-button, entity-header, MIME-Preview, MIME-Preview
-@section entity-button
-@cindex entity-number
-@cindex entity-button
-
-@strong{entity-button} \e$B$O\e(B entity \e$B$N@hF,$K$"$C$F!"$=$N\e(B entity \e$B$K4X$9$kBg\e(B
-\e$B$^$+$J>pJs$rI=<($9$kItJ,$G$9!#\e(B@refill
-
-\e$BI8=`$G$O\e(B
-
-@example
- [1.3 test (text/plain)]
-@end example
-
-@noindent
-\e$B$N$h$&$J46$8$KI=<($5$l$^$9!#\e(B
-
-\e$B:G=i$N?t;z$O\e(B message \e$BCf$N$3$N\e(B entity \e$B$N0LCV$r@aHV9f$N$h$&$KI=$7$?$b$N$G!"\e(B
-@strong{entity-number} \e$B$H8F$S$^$9!#\e(B@refill
-
-\e$B#2HVL\$NJ8;zNs$OI=Bj$rI=$7$^$9!#$3$N>pJs$O!"\e(B
-
-@enumerate
-@item
-Content-Description field \e$B$b$7$/$O\e(B Subject field \e$B$K=q$+$l$?I=Bj\e(B
-@item
-Content-Disposition field \e$B$N\e(B filename parameter \e$B$K=q$+$l$?\e(B file \e$BL>\e(B
-@item
-Content-Type field \e$B$N\e(B name parameter \e$B$K=q$+$l$?\e(B file \e$BL>\e(B
-@item
- uuencode \e$B$N>l9g$N\e(B file \e$BL>\e(B
-@end enumerate
-
-@noindent
-\e$B$+$i:n$j$^$9!#$I$l$bB8:_$7$J$$>l9g$O6uGr$,I=<($5$l$^$9!#\e(B
-
-\e$B#3HVL\$N3g8L$NCf$N>pJs$O$=$N\e(B entity \e$B$N\e(B media-type/subtype \e$B$rI=$7$^$9!#Hs\e(B
-MIME entity \e$B$N>l9g!"\e(B@code{nil} \e$B$,I=<($5$l$^$9!#\e(B@refill
-
-\e$B$3$N\e(B entity-button \e$B$O\e(B entity \e$B$NFbMF$r>]D'$9$k\e(B icon \e$B$N$h$&$JLr3d$r2L$?\e(B
-\e$B$7$^$9!#Nc$($P!"\e(B
-
-@example
- [2 (image/gif)]
-@end example
-
-@noindent
-\e$B$N>e$G\e(B @kbd{v} \e$B$r2!$;$P$3$3$KF~$C$F$$$k3($,I=<($5$l$^$9!#\e(B
-
-\e$B$^$?!"\e(Bmouse \e$BA`:n$,2DG=$J>l9g!"\e(Bentity-button \e$B$rBh#2%\%?%s!J\e(B3 button
-mouse \e$B$N>l9g!"Cf1{$N%\%?%s!K$G2!$;$P!"F1MM$K$=$N3($,I=<($5$l$^$9!#\e(B
-
-
-@node entity-header, entity-body, entity-button, MIME-Preview
-@section entity-header
-@cindex entity-header
-
-@strong{entity-header} \e$B$O$"$k\e(B entity \e$B$N\e(B header \e$B$rI=<($9$kIt\e(B
-\e$BJ,$G$9!J!V$=$N$^$^$d$s$1!W$C$FE\$i$J$$$G!#$=$&$$$&$b$s$J$s$G$9!K!#\e(B
-
-
-@node entity-body, , entity-header, MIME-Preview
-@section entity-body
-@cindex entity-body
-
-@strong{entity-body} \e$B$O\e(B part \e$B$NFbMF$rI=<($9$kItJ,$G$9!#\e(B@refill
-
-\e$B$3$l$b$R$M$j$,B-$j$J$$$G$9$,!"$^$"!"$=$&$$$&$b$s$G$9!#\e(B@refill
-
-\e$B$H$O$$$(!"<B:]$K$O>/$7$R$M$C$F$^$9!#\e(B@refill
-
-text entity \e$B$N>l9g$O\e(B charset \e$B$K1~$8$F\e(B code \e$BJQ49$7$?$j$7$^$9$7!"\e(BXEmacs \e$B$G\e(B
-\e$B$O\e(B image entity \e$B$rJQ49$7$J$$$H$$$1$J$$$7!#\e(B@refill
-
-\e$B>\$7$/$O$^$?8e$G!#\e(B
-
-
-@node mime-view-mode, Concept Index, MIME-Preview, Top
-@chapter mime-preview-buffer \e$B$G$NA`:n\e(B
-
-mime-preview-buffer \e$B$K$O0J2<$N5!G=$,$"$j$^$9!#\e(B@refill
-
-@table @kbd
-@item @key{u}
-\e$B>e$N\e(B part \e$B$KLa$k!J\e(Bmessage \e$B$N0lHV>e$N\e(B part \e$B$G$3$l$r9T$J$&$H\e(B Summary
-mode \e$B$KLa$k\e(B (*1)\e$B!K\e(B
-
-@item @key{p}
-\e$BA0$N\e(B part \e$B$K0\F0$9$k\e(B
-
-@item @key{M-TAB}
-\e$BA0$N\e(B part \e$B$K0\F0$9$k\e(B
-
-@item @key{n}
-\e$B<!$N\e(B part \e$B$K0\F0$9$k\e(B
-
-@item @key{TAB}
-\e$B<!$N\e(B part \e$B$K0\F0$9$k\e(B
-
-@item @key{SPC}
-scroll up \e$B$9$k\e(B
-
-@item @key{M-SPC}
-scroll down \e$B$9$k\e(B
-
-@item @key{DEL}
-scroll down \e$B$9$k\e(B
-
-@item @key{RET}
-\e$B<!$N9T$K0\F0$9$k\e(B
-
-@item @key{M-RET}
-\e$BA0$N9T$K0\F0$9$k\e(B
-
-@item @key{v}
-part \e$B$r:F@8$9$k\e(B (*2)
-
-@item @key{e}
-part \e$B$+$i\e(B file \e$B$r<h$j=P$9\e(B (*2)
-
-@item @key{C-c C-p}
-part \e$B$r0u:~$9$k\e(B (*2)
-
-@item @key{mouse-button-2}
-preview-buffer \e$BCf$N\e(B mouse button \e$B$r5/F0$9$k\e(B
-
-content-button \e$B$r2!$;$P!"$=$N\e(B part \e$B$,:F@8$5$l$k\e(B(*2)@refill
-
-URL-button \e$B$r2!$;$P!"$=$N\e(B WWW browser \e$B$,5/F0$5$l$k\e(B@refill
-
-@end table
-
-@noindent
-@strong{[\e$BCm0U\e(B]}
-@quotation
-
-(*1) MUA \e$B$G\e(B mime-view \e$B$N@_Dj$r$7$F$$$J$$>l9g!"\e(BSummary mode \e$B$K$OLa$j$^$;\e(B
-\e$B$s!#\e(B@refill
-
-(*2) \e$B<B:]$NF0:n$OBP1~$9$k\e(B method \e$B$K0M$j$^$9!#\e(B
-@end quotation
-
-
-
-@node Concept Index, Function Index, mime-view-mode, Top
-@chapter \e$B35G0:w0z\e(B
-
-@printindex cp
-
-@node Function Index, Variable Index, Concept Index, Top
-@chapter \e$B4X?t:w0z\e(B
-
-@printindex fn
-
-@node Variable Index, , Function Index, Top
-@chapter \e$BJQ?t:w0z\e(B
-
-@printindex vr
-@bye
(autoload 'mime-preview-play-current-entity "mime-play"
"Play current entity." t)
-(defun mime-preview-extract-current-entity ()
+(defun mime-preview-extract-current-entity (&optional ignore-examples)
"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-acting-condition'."
- (interactive)
- (mime-preview-play-current-entity "extract")
+ (interactive "P")
+ (mime-preview-play-current-entity ignore-examples "extract")
)
-(defun mime-preview-print-current-entity ()
+(defun mime-preview-print-current-entity (&optional ignore-examples)
"Print current entity (maybe).
It decodes current entity to call internal or external method as
\"print\" mode. The method is selected from variable
`mime-acting-condition'."
- (interactive)
- (mime-preview-play-current-entity "print")
+ (interactive "P")
+ (mime-preview-play-current-entity ignore-examples "print")
)
(eval-when-compile (require 'cl))
-(defconst mime-user-interface-version '("WEMI" "Katahama" 1 8 2)
+(defconst mime-user-interface-version '("WEMI" "Hara" 1 8 4)
"Implementation name, version name and numbers of MIME-kernel package.")
(autoload 'mule-caesar-region "mule-caesar"
projects / elisp / semi.git / commitdiff