Newsgroups: fj.editor.emacs
Path: galaxy.trc.rwcp.or.jp!jaist-news!cs.titech!wnoc-tyo-news!news.u-tokyo.ac.jp!s.u-tokyo!kuis!okabe
From: okabe@kutsuda.kuis.kyoto-u.ac.jp (Yasuo Okabe)
Subject: mime.el (was Re: mh-e)
In-Reply-To: mic@flab.fujitsu.co.jp's message of Tue, 31 Aug 1993 06:41:41 GMT
Content-Type: text/plain; charset=ISO-2022-JP
Message-ID: <OKABE.93Sep7124854@vamp.kuis.kyoto-u.ac.jp>
Sender: news@kuis.kyoto-u.ac.jp
Nntp-Posting-Host: vamp.kutsuda.kuis.kyoto-u.ac.jp
Reply-To: okabe@kutsuda.kuis.kyoto-u.ac.jp
Organization: Dept. of Information Science, Kyoto Univ. JAPAN
References: <KATA.93Aug30184400@demeter.rokoh.gen.u-tokyo.ac.jp>
	<OKABE.93Aug31131857@mule.kuis.kyoto-u.ac.jp>
	<MIC.93Aug31154142@miku.proc.flab.Fujitsu.Co.JP>
Mime-Version: 1.0
Distribution: fj
Date: Tue, 7 Sep 1993 03:48:54 GMT
Dnas-Posting-Host: vamp.kutsuda.kuis.kyoto-u.ac.jp
Lines: 56
Xref: galaxy.trc.rwcp.or.jp fj.editor.emacs:3992
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.editor.emacs&nb=3992&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

In article <MIC.93Aug31154142@miku.proc.flab.Fujitsu.Co.JP>,
    mic@flab.fujitsu.co.jp (Michihide KIMURA) writes:

> $B$7$F(B show-+drafts $B%P%C%U%!$K$=$N=q$-$+$1$N%U%!%$%k$rI=<($5$;$F!"(B
>   M-x mh-letter-mode

mic>  $BA0$O$3$l$GNI$+$C$?$N$G$9$,!"(Bmetamail $BBP1~$K$7$?$i!"0lC6(B 
mic> metamail $B$r$/$0$7$?J*$r%P%C%U%!$KEG$$$F$$$k$i$7$/!"D9$$%X%C(B
mic> $B%@$N0lIt$,@Z$l$F<!$N9T$KF~$C$F$7$^$&$?$a!"Aw$C$?;~$K%(%i!<$,(B
mic> $B=P$k$3$H$,$"$j$^$9!#(B

$B$3$l$OIaDL$K(B M-x mh-smail $B$7$?$H$-$G$bF1$8$3$H$G$O$J$$$G$7$g$&$+!)(B

mic> $BCm0U$7$^$7$g$&!#(B(^_^;)

$B$*$C$7$c$k>u67$H$O$9$3$70c$&$+$b$7$l$^$;$s$,!"(BSubject $B9T$KD9$$4A;zNs$r(B
$B=q$/$H(B M-x mh-send-letter $B$,<:GT$7$^$9!#4A;zNs$NCf$K$H$3$m$I$3$mH>3Q(B
$B%9%Z!<%9$r:.$<$k$HBg>fIW$G$7$?!#;H$C$F$$$k(B mime.el $B$N%P!<%8%g%s$O(B

;; Version: $Header: mime.el,v 1.60 93/08/21 19:40:55 umerin Locked $

$B$G$9!#$b$&>/$7<B83$7$F$_$?$H$3$m!"(B

  (mime-translate-header-string "$B#0#1#2#3#4#5#6#7#8#9#0#1#2#3#4#5#6#7#8#9#0#1#2#3#4#5#6#7(B")

$B$O$A$c$s$H(B

"=?ISO-2022-JP?B?GyRCIzAjMRsoQg==?==?ISO-2022-JP?B?GyRCIzIjMyM0IzUbKEI=?=
 =?ISO-2022-JP?B?GyRCIzYjNyM4IzkjMCMxIzIjMyM0IzUjNiM3IzgbKEI=?=
 =?ISO-2022-JP?B?GyRCIzkjMCMxIzIjMyM0IzUjNiM3GyhC?="

$B$H$$$&7k2L$rJV$9$N$G$9$,!"0lJ8;z$@$1A}$d$7$?(B

  (mime-translate-header-string "$B#0#1#2#3#4#5#6#7#8#9#0#1#2#3#4#5#6#7#8#9#0#1#2#3#4#5#6#7#8(B")

$B$O(B

    Signalling: (beginning-of-buffer)
      backward-char(30)

$B$H$J$C$F;_$^$C$F$7$^$$$^$9!#(Bmime.el $B$N(B mime-translate-header-string $B$N(B
$BDj5A$NCf$N(B

  ;; Still too long, so insert a newline.
  (backward-char
   (max 1
(/ (* (- (point) start)
      (- (length chunk) mime-max-header-length))
   (- (length chunk)
      (length (car this-encoding))
      (length (cdr this-encoding)) 6))))
  ))

$B$NItJ,$@$H;W$$$^$9$,!"$=$l0J>e$O;d$K$O$A$g$C$H(B... ^_^;;
-----
$B2,It<wCK!w5~ETBg3X9)3XIt>pJs9)3X65<<7W;;5!%=%U%H%&%'%"9V:B(B
