FILES = README.eng Makefile Makefile.18 Makefile.19 *.el *.c methods \
doc/Makefile doc/*.pln doc/*.ol doc/*.tex doc/*.texi
-TARFILE = tm5.21.tar
+TARFILE = tm5.21.1.tar
all: $(UTILS) $(DVI)
--- /dev/null
+\input texinfo.tex
+@c{-*-tiny-mime manual-*-}
+@setfilename tm-head-jp.info
+@settitle{tiny-mime manual}
+
+@titlepage
+@sp{5}
+@center{@titlefont{tiny-mime}}
+@sp{15}
+@center{@titlefont{\e$B<i2,\e(B \e$BCNI'\e(B}}
+@sp{1}
+@center{$Id$}
+
+@end titlepage
+
+
+@menu
+@end menu
+
+@node Top, Abstract, (dir), (dir)
+@comment node-name, next, previous, up
+
+@ifinfo
+tm \e$B$K$*$1$k\e(B MIME header \e$B$N\e(B encoder/decoder \e$B$G$"$k\e(B tiny-mime \e$B$K$D$$$F@b\e(B
+\e$BL@$7$^$9!#\e(B
+@end ifinfo
+
+@menu
+* Abstract::
+* Charset::
+* How-to-use::
+* Variable::
+* Customize::
+@end menu
+
+
+@node Abstract, Charset, Top, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$H$O\e(B}
+@cindex{tiny-mime \e$B$H$O\e(B}
+
+tiny-mime \e$B$O\e(B tm \e$B$K$*$1$k\e(B MIME header (RFC 1522) \e$B$N\e(B encoder/decoder \e$B$G$9!#\e(B
+
+\e$B%*%j%8%J%k$O!"@N!"$($J$_\e(B \e$B$D$0$H$b\e(B \e$B$5$s$,\e(B fj.editor.emacs \e$B$KEj9F$5$l$?\e(B
+MIME message header \e$B$N\e(B decoder \e$B$G$9!#\e(B
+
+\e$B8=:_$G$O!"Ev;~$N$b$N$KHf$Y!"\e(Bunfolding \e$B5!G=$d!"\e(BMule \e$B$K$*$1$kB?8@8lJ8;z\e(B
+\e$BNs$N%5%]!<%H!"\e(BB-encoding \e$B$K2C$(\e(B Q-encoding \e$B$N%5%]!<%H$J$I$N3HD%$,$J$5\e(B
+\e$B$l$F$$$^$9!#\e(B
+
+
+@node Charset, How-to-use, Abstract, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$N%5%]!<%H$9$k\e(B charset}
+@cindex{tiny-mime \e$B$N%5%]!<%H$9$k\e(B charset}
+
+@section{original GNU Emacs 18}
+
+\e$BF0:n$OJ]>Z$7$^$;$s!#$7$+$7$J$,$i!"\e(BUS-ASCII \e$B$NHO0O$G$OF0:n$9$k$H;W$o$l\e(B
+\e$B$^$9!#!J$"$^$j0UL#$,$J$$$+$bCN$l$^$;$s$,!K\e(B
+
+@section{NEmacs, NEpoch}
+
+ISO-2022-JP, US-ASCII \e$B$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#\e(B
+
+\e$B$^$?!"\e(BISO-8859-*\e$B$G$"$C$F$b!"\e(Bencoded-text \e$B$K4^$^$l$kJ8;zNs$,<B:]$K$O\e(B
+ASCII \e$B$GI=$;$kHO0O$J$iI=<($7$^$9!#\e(B
+
+@section{original GNU Emacs 19}
+
+US-ASCII \e$B$*$h$S\e(B ISO-8859-1 \e$B$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#\e(B
+
+@section{Mule}
+
+ISO-2022-JP, US-ASCII, ISO-8859-1..9, ISO-2022-CN, ISO-2022-KR, EUC-KR
+\e$B$J$I$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#$^$?!"4X?t\e(B
+mime/set-charset-and-encoding \e$B$GDI2C!&JQ99$,$G$-$^$9!#\e(B
+(@xref{Customize-for-charset})
+
+
+@node How-to-use, Variable, Charset, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$N4JC1$J;H$$J}\e(B}
+@cindex{tiny-mime \e$B$N4JC1$J;H$$J}\e(B}
+
+@section{decode}
+
+tiny-mime.el \e$B$r\e(B load \e$B$7$F!"\e(Bdecode \e$B$7$?$$\e(B buffer \e$B>e$G!"\e(B
+
+@example
+ M-x mime/decode-message-header
+@end example
+
+\e$B$r<B9T$7$^$9!#\e(B
+
+\e$B$^$?!"\e(Bdecode \e$B$7$?$$\e(B region \e$B$r\e(B
+
+@example
+ M-x mime/decode-region
+@end example
+
+\e$B$G\e(B decode \e$B$9$k$3$H$,$G$-$^$9!#0zMQ$J$I$G\e(B body-part \e$B$K;D$C$?\e(B
+encoded-word \e$B$r\e(B decode \e$B$9$k$N$KJXMx$G$7$g$&!#\e(B
+
+
+@section{encode}
+
+tiny-mime.el \e$B$r\e(B load \e$B$7$F!"\e(Bencode \e$B$7$?$$\e(B buffer \e$B>e$G!"\e(B
+
+@example
+ M-x mime/encode-message-header
+@end example
+
+\e$B$r<B9T$7$^$9!#\e(B
+
+
+@node Variable, Customize, How-to-use, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$NJQ?t\e(B}
+@cindex{tiny-mime \e$B$NJQ?t\e(B}
+
+@defvr{Variable} mime/no-encoding-header-fields
+
+tiny-mime.el \e$B$G\e(B encode \e$B$7$J$$\e(B message header \e$B$N\e(B field \e$B$r;XDj$7$^$9!#\e(B
+
+default \e$B$G$O\e(B X-Nsubject \e$B$,;XDj$5$l$F$$$^$9!#\e(B
+
+\e$BNc!'\e(B X-Nsubject \e$B$H\e(B Subject \e$B$r\e(B encode \e$B$7$J$$$h$&$K$9$k!#\e(B
+
+@example
+(setq mime/no-encoding-header-fields '("X-Nsubject" "Subject"))
+@end example
+
+\e$B!NCm0U!O\e(B mime.el \e$B$HJ;MQ$9$k>l9g!"\e(Btiny-mime.el \e$B$,\e(B encode \e$B$7$J$/$F$b!"\e(B
+mime.el \e$B$,\e(B encode \e$B$9$k$N$G!"\e(Bmime.el \e$B$N\e(B message header encoder \e$B$,F/$+$J\e(B
+\e$B$$$h$&$K$K@_Dj$7$^$9!#\e(B
+@end defvr
+
+@defvr{Variable} mime/use-X-Nsubject
+
+\e$B$3$NJQ?t$NCM$,\e(B t \e$B$N>l9g!"\e(Bmessage header \e$B$r\e(B encode \e$B$9$k;~!"\e(Bencode \e$B$7$?\e(B
+\e$B7k2L!"\e(BSubject \e$B$K\e(B encoded-word \e$B$,4^$^$l$k>l9g!"\e(BSubject \e$B$r\e(B decode \e$B$7$?$b\e(B
+\e$B$N$rF~$l$?\e(B X-Nsubject \e$B$r:n@.$7$^$9!#\e(B
+
+default \e$B$G$O\e(B nil \e$B$,;XDj$5$l$F$$$^$9!#\e(B
+
+\e$B!NCm0U!O\e(BMule \e$B$G\e(B ISO-2022-JP \e$B$K4^$^$l$k$b$N0J30$NJ8;z=89g$r;H$&>l9g$O!"\e(B
+\e$B$3$l$r;XDj$7$J$$J}$,8-L@$G$9!#\e(B
+@end defvr
+
+
+@node Customize, Top, Variable, Top
+@comment node-name, next, previous, up
+@chapter{\e$B%+%9%?%^%$%:\e(B}
+@cindex{\e$B%+%9%?%^%$%:\e(B}
+
+@menu
+* Customize-for-charset::
+@end menu
+
+@node Customize-for-charset, Customize, Customize, Customize
+@comment node-name, next, previous, up
+@section{charset \e$B$NDI2C!&JQ99\e(B}
+@cindex{charset \e$B$NDI2C!&JQ99\e(B}
+
+Mule \e$B$G$O!"4X?t\e(B mime/set-charset-and-encoding \e$B$G!"\e(Bcharset \e$B$NDI2C!&JQ99\e(B
+\e$B$,$G$-$^$9!#\e(B
+
+@deffn{Function} mime/set-charset-and-encoding LC CS CHARSET ENCODING
+
+@table @var
+@item LC
+charset \e$B$KBP1~$9$k\e(B leading-char \e$B$r;XDj$9$k!#\e(B
+
+@item CS
+charset \e$B$KBP1~$9$k\e(B coding-system \e$B$r;XDj$9$k!#\e(B1 octet \e$BJ8;z=89g$G\e(B
+coding-system \e$B$r:n$i$J$$>l9g$O!"\e(Bnil \e$B$r;XDj$9$k!#\e(B
+
+@item CHARSET
+MIME \e$B$N\e(B charset.
+
+@item ENCODING
+encode \e$B$9$k:]$N\e(B encoding.
+@end table
+
+@end deffn
+
+@bye
--- /dev/null
+\input texinfo.tex
+@c{-*-tiny-mime manual-*-}
+@setfilename tm-head-jp.info
+@settitle{tiny-mime manual}
+
+@titlepage
+@sp{5}
+@center{@titlefont{tiny-mime}}
+@sp{15}
+@center{@titlefont{\e$B<i2,\e(B \e$BCNI'\e(B}}
+@sp{1}
+@center{$Id: tm-head-jp.texi,v 1.1 1994/12/05 06:46:58 morioka Exp $}
+
+@end titlepage
+
+
+@menu
+@end menu
+
+@node Top, Abstract, (dir), (dir)
+@comment node-name, next, previous, up
+
+@ifinfo
+tm \e$B$K$*$1$k\e(B MIME header \e$B$N\e(B encoder/decoder \e$B$G$"$k\e(B tiny-mime \e$B$K$D$$$F@b\e(B
+\e$BL@$7$^$9!#\e(B
+@end ifinfo
+
+@menu
+* Abstract::
+* Charset::
+* How-to-use::
+* Variable::
+* Customize::
+@end menu
+
+
+@node Abstract, Charset, Top, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$H$O\e(B}
+@cindex{tiny-mime \e$B$H$O\e(B}
+
+tiny-mime \e$B$O\e(B tm \e$B$K$*$1$k\e(B MIME header (RFC 1522) \e$B$N\e(B encoder/decoder \e$B$G$9!#\e(B
+
+\e$B%*%j%8%J%k$O!"@N!"$($J$_\e(B \e$B$D$0$H$b\e(B \e$B$5$s$,\e(B fj.editor.emacs \e$B$KEj9F$5$l$?\e(B
+MIME message header \e$B$N\e(B decoder \e$B$G$9!#\e(B
+
+\e$B8=:_$G$O!"Ev;~$N$b$N$KHf$Y!"\e(Bunfolding \e$B5!G=$d!"\e(BMule \e$B$K$*$1$kB?8@8lJ8;z\e(B
+\e$BNs$N%5%]!<%H!"\e(BB-encoding \e$B$K2C$(\e(B Q-encoding \e$B$N%5%]!<%H$J$I$N3HD%$,$J$5\e(B
+\e$B$l$F$$$^$9!#\e(B
+
+
+@node Charset, How-to-use, Abstract, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$N%5%]!<%H$9$k\e(B charset}
+@cindex{tiny-mime \e$B$N%5%]!<%H$9$k\e(B charset}
+
+@section{original GNU Emacs 18}
+
+\e$BF0:n$OJ]>Z$7$^$;$s!#$7$+$7$J$,$i!"\e(BUS-ASCII \e$B$NHO0O$G$OF0:n$9$k$H;W$o$l\e(B
+\e$B$^$9!#!J$"$^$j0UL#$,$J$$$+$bCN$l$^$;$s$,!K\e(B
+
+@section{NEmacs, NEpoch}
+
+ISO-2022-JP, US-ASCII \e$B$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#\e(B
+
+\e$B$^$?!"\e(BISO-8859-*\e$B$G$"$C$F$b!"\e(Bencoded-text \e$B$K4^$^$l$kJ8;zNs$,<B:]$K$O\e(B
+ASCII \e$B$GI=$;$kHO0O$J$iI=<($7$^$9!#\e(B
+
+@section{original GNU Emacs 19}
+
+US-ASCII \e$B$*$h$S\e(B ISO-8859-1 \e$B$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#\e(B
+
+@section{Mule}
+
+ISO-2022-JP, US-ASCII, ISO-8859-1..9, ISO-2022-CN, ISO-2022-KR, EUC-KR
+\e$B$J$I$N\e(B encoding/decoding \e$B$r%5%]!<%H$7$^$9!#$^$?!"4X?t\e(B
+mime/set-charset-and-encoding \e$B$GDI2C!&JQ99$,$G$-$^$9!#\e(B
+(@xref{Customize-for-charset})
+
+
+@node How-to-use, Variable, Charset, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$N4JC1$J;H$$J}\e(B}
+@cindex{tiny-mime \e$B$N4JC1$J;H$$J}\e(B}
+
+@section{decode}
+
+tiny-mime.el \e$B$r\e(B load \e$B$7$F!"\e(Bdecode \e$B$7$?$$\e(B buffer \e$B>e$G!"\e(B
+
+@example
+ M-x mime/decode-message-header
+@end example
+
+\e$B$r<B9T$7$^$9!#\e(B
+
+\e$B$^$?!"\e(Bdecode \e$B$7$?$$\e(B region \e$B$r\e(B
+
+@example
+ M-x mime/decode-region
+@end example
+
+\e$B$G\e(B decode \e$B$9$k$3$H$,$G$-$^$9!#0zMQ$J$I$G\e(B body-part \e$B$K;D$C$?\e(B
+encoded-word \e$B$r\e(B decode \e$B$9$k$N$KJXMx$G$7$g$&!#\e(B
+
+
+@section{encode}
+
+tiny-mime.el \e$B$r\e(B load \e$B$7$F!"\e(Bencode \e$B$7$?$$\e(B buffer \e$B>e$G!"\e(B
+
+@example
+ M-x mime/encode-message-header
+@end example
+
+\e$B$r<B9T$7$^$9!#\e(B
+
+
+@node Variable, Customize, How-to-use, Top
+@comment node-name, next, previous, up
+@chapter{tiny-mime \e$B$NJQ?t\e(B}
+@cindex{tiny-mime \e$B$NJQ?t\e(B}
+
+@defvr{Variable} mime/no-encoding-header-fields
+
+tiny-mime.el \e$B$G\e(B encode \e$B$7$J$$\e(B message header \e$B$N\e(B field \e$B$r;XDj$7$^$9!#\e(B
+
+default \e$B$G$O\e(B X-Nsubject \e$B$,;XDj$5$l$F$$$^$9!#\e(B
+
+\e$BNc!'\e(B X-Nsubject \e$B$H\e(B Subject \e$B$r\e(B encode \e$B$7$J$$$h$&$K$9$k!#\e(B
+
+@example
+(setq mime/no-encoding-header-fields '("X-Nsubject" "Subject"))
+@end example
+
+\e$B!NCm0U!O\e(B mime.el \e$B$HJ;MQ$9$k>l9g!"\e(Btiny-mime.el \e$B$,\e(B encode \e$B$7$J$/$F$b!"\e(B
+mime.el \e$B$,\e(B encode \e$B$9$k$N$G!"\e(Bmime.el \e$B$N\e(B message header encoder \e$B$,F/$+$J\e(B
+\e$B$$$h$&$K$K@_Dj$7$^$9!#\e(B
+@end defvr
+
+@defvr{Variable} mime/use-X-Nsubject
+
+\e$B$3$NJQ?t$NCM$,\e(B t \e$B$N>l9g!"\e(Bmessage header \e$B$r\e(B encode \e$B$9$k;~!"\e(Bencode \e$B$7$?\e(B
+\e$B7k2L!"\e(BSubject \e$B$K\e(B encoded-word \e$B$,4^$^$l$k>l9g!"\e(BSubject \e$B$r\e(B decode \e$B$7$?$b\e(B
+\e$B$N$rF~$l$?\e(B X-Nsubject \e$B$r:n@.$7$^$9!#\e(B
+
+default \e$B$G$O\e(B nil \e$B$,;XDj$5$l$F$$$^$9!#\e(B
+
+\e$B!NCm0U!O\e(BMule \e$B$G\e(B ISO-2022-JP \e$B$K4^$^$l$k$b$N0J30$NJ8;z=89g$r;H$&>l9g$O!"\e(B
+\e$B$3$l$r;XDj$7$J$$J}$,8-L@$G$9!#\e(B
+@end defvr
+
+
+@node Customize, Top, Variable, Top
+@comment node-name, next, previous, up
+@chapter{\e$B%+%9%?%^%$%:\e(B}
+@cindex{\e$B%+%9%?%^%$%:\e(B}
+
+@menu
+* Customize-for-charset::
+@end menu
+
+@node Customize-for-charset, Customize, Customize, Customize
+@comment node-name, next, previous, up
+@section{charset \e$B$NDI2C!&JQ99\e(B}
+@cindex{charset \e$B$NDI2C!&JQ99\e(B}
+
+Mule \e$B$G$O!"4X?t\e(B mime/set-charset-and-encoding \e$B$G!"\e(Bcharset \e$B$NDI2C!&JQ99\e(B
+\e$B$,$G$-$^$9!#\e(B
+
+@deffn{Function} mime/set-charset-and-encoding LC CS CHARSET ENCODING
+
+@table @var
+@item LC
+charset \e$B$KBP1~$9$k\e(B leading-char \e$B$r;XDj$9$k!#\e(B
+
+@item CS
+charset \e$B$KBP1~$9$k\e(B coding-system \e$B$r;XDj$9$k!#\e(B1 octet \e$BJ8;z=89g$G\e(B
+coding-system \e$B$r:n$i$J$$>l9g$O!"\e(Bnil \e$B$r;XDj$9$k!#\e(B
+
+@item CHARSET
+MIME \e$B$N\e(B charset.
+
+@item ENCODING
+encode \e$B$9$k:]$N\e(B encoding.
+@end table
+
+@end deffn
+
+@bye
;; original file is
;; gif.el written by Art Mellor @ Cayman Systems, Inc. 1991
+;;; $Id: tm-partial.el,v 1.5 1994/12/05 05:13:25 morioka Exp $
+
(require 'tm-view)
;; This regular expression controls what types of subject lines can be
cant-find)))
+;;; @ set up
+;;;
+
+(set-atype 'mime/content-decoding-condition
+ '((type . "message/partial")
+ (method . mime/decode-message/grab-partials)
+ (major-mode . gnus-article-mode)
+ ))
+
(set-atype 'mime/content-decoding-condition
'((type . "message/partial")
(method . mime/decode-message/grab-partials)
+ (major-mode . mh-show-mode)
))
(provide 'tm-partial)
;;;
;;; by MASUTANI Yasuhiro <masutani@me.es.osaka-u.ac.jp>
;;; modified by SHIONO <jun@p5.nm.fujitsu.co.jp>
+;;; and Steinar Bang <steinarb@falch.no>
;;;
;;; Plese insert (load "tm-vm") in .vm or .emacs.
;;;
(require 'tm-view)
(defconst tm-vm/RCS-ID
- "$Id: tm-vm.el,v 1.5 1994/11/01 16:30:12 morioka Exp $")
+ "$Id: tm-vm.el,v 1.6 1994/12/05 07:12:14 morioka Exp $")
(defconst tm-vm/version (get-version-string tm-vm/RCS-ID))
(define-key vm-mode-map "Z" 'tm-vm/view-message)
'vm-virtual-mode
'tm-vm/quit-view-message)
+
+;;; @ for MIME header
+;;;
+;; If you don't use tiny-mime patch for VM (by RIKITAKE Kenji
+;; <kenji@reseau.toyonaka.osaka.jp>), please use following definition:
+
+;; (setq vm-summary-format "%n %*%a %-17.17F %-3.3m %2d %4l/%-5c, %I\"%UA\"\n")
+;; (defun vm-summary-function-A (m)
+;; (mime/decode-string (vm-su-subject m)))
+
+
+;;; @ functions
+;;;
+
(defun tm-vm/quit-view-message()
(mime/exit-view-mode)
(let ((w (get-buffer-window mime/output-buffer-name)))
projects / elisp / tm.git / commitdiff