tm 4.8.1.

diff --git a/Makefile b/Makefile
index 19700ea..e9d55bf 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -24,7 +24,7 @@ GOMI  = *.aux *.log *.tex $(DVIFILES) *.ps $(UTILS)
 
 FILES  = *.ol Makefile *.el *.c methods $(TEXFILES)
 
-TARFILE = tm4.7.1.tar
+TARFILE = tm4.8.1.tar
 
 .SUFFIXES:     .ol .tex .dvi .ps
 

diff --git a/tiny-mime.el b/tiny-mime.el
index 7052237..6bf81df 100644 (file)
--- a/tiny-mime.el
+++ b/tiny-mime.el
@@ -9,7 +9,7 @@
 (provide 'tiny-mime)
 
 (defconst mime/RCS-ID
-  "$Id: tiny-mime.el,v 4.7 1994/08/03 05:40:35 morioka Exp $")
+  "$Id: tiny-mime.el,v 4.8 1994/08/11 14:43:54 morioka Exp $")
 
 (defconst mime/tiny-mime-version
   (and (string-match "[0-9][0-9.]*" mime/RCS-ID)
@@ -18,6 +18,9 @@
 
 (require 'tl-header)
 
+(if (not (fboundp 'member))
+    (require 'tl-18)
+  )
 
 ;;; @ MIME encoded-word definition
 ;;;

diff --git a/tm-body.el b/tm-body.el
index d23fd77..102b4e6 100644 (file)
--- a/tm-body.el
+++ b/tm-body.el
@@ -1,5 +1,5 @@
 ;;;
-;;; $Id: tm-body.el,v 0.14 1994/08/03 05:31:33 morioka Exp $
+;;; $Id: tm-body.el,v 0.15 1994/08/05 01:49:35 morioka Exp $
 ;;;
 
 (provide 'tm-body)
@@ -50,18 +50,12 @@
     ("image/jpeg"   . "tm-image")
     ("image/tiff"   . "tm-image")
     ("image/x-tiff" . "tm-image")
+    ("image/x-xbm"  . "tm-image")
     ("image/x-pic"  . "tm-image")
     ("video/mpeg"   . "tm-mpeg")
     ("application/octet-stream" . "tm-file")
     ))
-;;; (setq mime/content-decoding-method-alist
-;;;   '(("audio/basic" . "tm-au")
-;;;    ("image/gif"   . "tm-image")
-;;;    ("image/jpeg"  . "tm-image")
-;;;    ("image/x-pic" . "tm-image")
-;;;    ("video/mpeg"  . "tm-mpeg")
-;;;    ("application/octet-stream" . "tm-file")
-;;;    ))
+
 (defvar mime/use-internal-decoder nil)
 ;;; (setq mime/use-internal-decoder t)
 

diff --git a/tm-mh-e-eng.ol b/tm-mh-e-eng.ol
index 5cc252d..67edfe5 100644 (file)
--- a/tm-mh-e-eng.ol
+++ b/tm-mh-e-eng.ol
@@ -1,7 +1,7 @@
 [[R
 \title{tm-mh-e manual (English Version)}
 \author{Morioka Tomohiko}
-\date{1994/7/25}
+\date{1994/8/20}
 \maketitle
 ]]R
 
@@ -33,13 +33,16 @@ load mh-e version 3.x.
 
 * .emacs
 
-  Please insert following list to .emacs.
+  Please use mime-setup.
+
+  If you do not want to use mime-setup, insert following list to .
+emacs.
 
 [[E
 ----------------------------------------------------------------------
 (if (< (string-to-int emacs-version) 19)
     (progn
-      (require 'tl-hook)
+      (require 'tl-18)
       (defvar buffer-undo-list nil)
       ))
 

diff --git a/tm-mh-e-eng.tex b/tm-mh-e-eng.tex
index e6ede60..dbb9d44 100644 (file)
--- a/tm-mh-e-eng.tex
+++ b/tm-mh-e-eng.tex
@@ -7,7 +7,7 @@
 \begin{document}
 \title{tm-mh-e manual (English Version)}
 \author{Morioka Tomohiko}
-\date{1994/7/25}
+\date{1994/8/20}
 \maketitle
 \medskip
 
@@ -51,15 +51,23 @@ load mh-e version 3.x.
 
 \section{.emacs}
 \medskip
-\par
-Please insert following list to .emacs.
+{\baselineskip=10pt
+\begin{verbatim}
+  Please use mime-setup.
+\end{verbatim}}
+\medskip
+{\baselineskip=10pt
+\begin{verbatim}
+  If you do not want to use mime-setup, insert following list to .
+emacs.
+\end{verbatim}}
 \medskip
 {\baselineskip=10pt
 \begin{verbatim}
 ----------------------------------------------------------------------
 (if (< (string-to-int emacs-version) 19)
     (progn
-      (require 'tl-hook)
+      (require 'tl-18)
       (defvar buffer-undo-list nil)
       ))
 

diff --git a/tm-mh-e-jp.ol b/tm-mh-e-jp.ol
index 2d1093f..1cc52c0 100644 (file)
--- a/tm-mh-e-jp.ol
+++ b/tm-mh-e-jp.ol
@@ -1,6 +1,6 @@
 \e$B!X\e(Btm-mh-e \e$B@bL@=q!Y\e(B
 by. \e$B<i2,\e(B \e$BCNI'\e(B
-1994\e$BG/\e(B7\e$B7n\e(B25\e$BF|\e(B
+1994\e$BG/\e(B8\e$B7n\e(B20\e$BF|\e(B
 
 * install
 
@@ -33,13 +33,15 @@ directory \e$B$K\e(B copy \e$B$7$^$9!#\e(B
 
 * \e$B@_Dj\e(B
 
-  .emacs \e$B$K0J2<$N$b$N$rF~$l$^$9!#\e(B
+  mime-setup \e$B$r;H$C$F2<$5$$!#\e(B
+
+  mime-setup \e$B$r;H$o$J$$>l9g$O\e(B .emacs \e$B$K0J2<$N$b$N$rF~$l$^$9!#\e(B
 
 [[E
 ----------------------------------------------------------------------
 (if (< (string-to-int emacs-version) 19)
     (progn
-      (require 'tl-hook)
+      (require 'tl-18)
       (defvar buffer-undo-list nil)
       ))
 

diff --git a/tm-mh-e-jp.tex b/tm-mh-e-jp.tex
index dbc5b00..34eb15f 100644 (file)
--- a/tm-mh-e-jp.tex
+++ b/tm-mh-e-jp.tex
@@ -11,7 +11,7 @@ tm-mh-e 
 ¼é²¬ ÃÎɧ\\
 }
 \date{
-1994ǯ7·î25Æü}
+1994ǯ8·î20Æü}
 \maketitle
 \medskip
 
@@ -57,14 +57,17 @@ tm-mh-e3.el 
 \section{ÀßÄê}
 \medskip
 \par
-.emacs ¤Ë°Ê²¼¤Î¤â¤Î¤òÆþ¤ì¤Þ¤¹¡£
+mime-setup ¤ò»È¤Ã¤Æ²¼¤µ¤¤¡£
+\medskip
+\par
+mime-setup ¤ò»È¤ï¤Ê¤¤¾ì¹ç¤Ï .emacs ¤Ë°Ê²¼¤Î¤â¤Î¤òÆþ¤ì¤Þ¤¹¡£
 \medskip
 {\baselineskip=10pt
 \begin{verbatim}
 ----------------------------------------------------------------------
 (if (< (string-to-int emacs-version) 19)
     (progn
-      (require 'tl-hook)
+      (require 'tl-18)
       (defvar buffer-undo-list nil)
       ))