tm-mh-e-jp.ol

   1 \e$B!X\e(Btm-mh-e \e$B@bL@=q!Y\e(B
   2 by. \e$B<i2,\e(B \e$BCNI'\e(B
   3 1994\e$BG/\e(B7\e$B7n\e(B25\e$BF|\e(B
   4
   5 * install
   6
   7 ** tiny-mime \e$B$N\e(B install
   8
   9   tiny-mime.el \e$B$r\e(B Emacs \e$B$NJQ?t\e(B load-path \e$B$G;XDj$5$l$?\e(B directory \e$B$K\e(B
  10 copy \e$B$7$^$9!#\e(B
  11
  12
  13 ** tm-body \e$B$N\e(B install
  14
  15   tm-body.el, tl-list.el, tl-header.el \e$B$r\e(B Emacs \e$B$NJQ?t\e(B load-path \e$B$G;X\e(B
  16 \e$BDj$5$l$?\e(B directory \e$B$K\e(B copy \e$B$7$^$9!#\e(B
  17
  18
  19 ** tm-misc \e$B$N\e(B install
  20
  21   tm-misc.el, tl-hook.el \e$B$r\e(B Emacs \e$B$NJQ?t\e(B load-path \e$B$G;XDj$5$l$?\e(B
  22 directory \e$B$K\e(B copy \e$B$7$^$9!#\e(B
  23
  24
  25 ** tm-mh-e \e$B$N\e(B install
  26
  27   tm-mh-e.el, tm-mh-e3.el \e$B$r\e(B Emacs \e$B$NJQ?t\e(B load-path \e$B$G;XDj$7$?\e(B
  28 directory \e$B$K\e(B copy \e$B$7$^$9!#\e(B
  29
  30   tm-mh-e3.el \e$B$r\e(B byte-compile \e$B$9$k>l9g$O!"\e(Bmh-e version 3.* \e$B$r\e(B load \e$B$7\e(B
  31 \e$B$?>uBV$G9T$J$C$F2<$5$$!#\e(B
  32
  33
  34 * \e$B@_Dj\e(B
  35
  36   .emacs \e$B$K0J2<$N$b$N$rF~$l$^$9!#\e(B
  37
  38 [[E
  39 ----------------------------------------------------------------------
  40 (if (< (string-to-int emacs-version) 19)
  41     (progn
  42       (require 'tl-hook)
  43       (defvar buffer-undo-list nil)
  44       ))
  45
  46 (add-hook 'mh-folder-mode-hook
  47           (function
  48            (lambda ()
  49              (require 'tm-mh-e)
  50              )))
  51 ----------------------------------------------------------------------
  52 ]]E
  53
  54   \e$B$^$?!"\e(BMH \e$B$,\e(B MH-6.8JP2 \e$B$N>l9g!"\e(B~/.mh_profile \e$B$K\e(B
  55
  56 [[E
  57 ----------------------------------------------------------------------
  58 scan:   -form scan.mime
  59 inc:    -form inc.mime
  60 repl:   -form replcomps.mime
  61 showproc: mhl
  62 ----------------------------------------------------------------------
  63 ]]E
  64
  65 \e$B$rDI2C$7$F$/$@$5$$!#$^$?!"$=$l0J30$N\e(B MH \e$B$N=hM}$O\e(B Emacs \e$B$NB&$G<h$j;E@Z\e(B
  66 \e$B$k$N$G!"\e(BMH \e$B$N@_Dj$O$7$J$$$h$&$K$7$F$/$@$5$$!#\e(B
  67
  68
  69 * \e$B;H$$J}\e(B
  70
  71 --------------------------------------------------------------------
  72 | key |                       \e$B5!G=\e(B                                 |
  73 ====================================================================
  74 | M-t |message header \e$B$r\e(B decode \e$B$K4X$9$k\e(B toggle switch             |
  75 --------------------------------------------------------------------
  76 |  v  |message body \e$B$r\e(B MIME decode \e$B$7$F!":F@8$9$k\e(B (play mode)      |
  77 |  e  |message body \e$B$r\e(B MIME decode \e$B$7$F!"\e(Bfile \e$B$KMn$9\e(B (extract mode)|
  78 |C-c p|message body \e$B$r\e(B MIME decode \e$B$7$F!"0u:~$9$k\e(B (print mode)     |
  79 --------------------------------------------------------------------
  80
  81   message body \e$B$N\e(B MIME decode \e$B$K$*$$$F!"<B:]$K3FF0:n$,9T$J$o$l$k$+$I$&\e(B
  82 \e$B$+$O!"3F\e(B Content-Type \e$B$KBP1~$9$k\e(B tm-body \e$B$N\e(B mthod \e$B$K0MB8$7$^$9!#\e(B
  83
  84
  85 * metamail \e$B$r;H$&J}K!\e(B
  86
  87   tm-mh-e \e$B$O\e(B MIME body \e$B$N\e(B decode \e$B$K\e(B tm-body \e$B$r;H$$$^$9$,!"\e(Bmetamail \e$B$r\e(B
  88 \e$B;H$&$h$&$K@_Dj$9$k$3$H$b2DG=$G$9!#C"$7!"\e(Bmetamail \e$B$H\e(B metamail.el \e$B$,I,MW\e(B
  89 \e$B$G$9!#\e(B
  90
  91   \e$B$3$N>l9g\e(B .emacs \e$B$K0J2<$N$b$N$rF~$l$F2<$5$$!#\e(B
  92
  93 [[E
  94 ----------------------------------------------------------------------
  95 (autoload 'metamail-buffer "metamail" nil t)
  96 (setq mime/body-decoding-method (function metamail-buffer))
  97 ----------------------------------------------------------------------
  98 ]]E
  99
 100   metamail \e$B$r;H$&@_Dj$N>l9g!"\e(B`v', `e', `C-c p' \e$B$KBP1~$9$kF0:n$O\e(B
 101 metamail \e$B$K$+$1$k$@$1$K$J$j!"F10l$NF0:n$K$J$j$^$9!#$^$?!"F0:n$OC`<!E*\e(B
 102 \e$B$K$J$j$^$9!#\e(B