+Fri Dec 27 20:39:43 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * tm: Version 7.100.2 was released.
+
+ * tm-def.el (tm:button-face, tm:mouse-face): Use `defvar' instead
+ of `setq'.
+
Fri Dec 27 12:11:29 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+ * tm: Version 7.100.1 was released.
+
* README.en (Documents): modified for new documents.
(Modules): Add tm-edit-mc.el and tm-edit-tipgp.el.
# $Id: Makefile,v 7.43 1996/12/25 19:18:43 morioka Exp morioka $
#
-VERSION = 7.100.1
+VERSION = 7.100.2
SHELL = /bin/sh
MAKE = make
-Sat Sep 21 15:14:49 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+Fri Dec 27 20:14:12 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
- * tm-mpeg: Comment was modified.
+ * tm-au: rearrangement.
-Sat Sep 21 15:12:12 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+Fri Dec 27 13:57:36 1996 Chris Felaco <felaco@GPW058.ED.RAY.COM>
- * tm-image: Comment was modified.
+ * tm-au: Don't use pipe to avoid problem in Solaris
+ 2.5. (cf. [tm-en:1068])
Sat Sep 21 15:08:47 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
#!/bin/sh -
#
-# $Id: tm-au,v 3.2 1996/03/25 12:35:55 morioka Exp $
+# $Id: tm-au,v 3.4 1996/12/27 20:14:12 morioka Exp $
#
if [ "$TM_TMP_DIR" = "" ]; then
case "$4" in
"play")
echo "$2; $3 ->"
+ tmdecode $3 $1 $filename
if [ "$AUDIOSERVER" = "" ]; then
if [ `uname` = "IRIX" ]; then
- tmdecode $3 $1 $filename
sfplay $filename
- trap 'rm -f $filename' 0 1 2 3 13 15
else
- tmdecode $3 $1 /dev/audio
+ cat $filename > /dev/audio
fi
else
- tmdecode $3 $1 $filename
autool -v 40 $filename
- trap 'rm -f $filename' 0 1 2 3 13 15
fi
+ trap 'rm -f $filename' 0 1 2 3 13 15
;;
"extract")
echo "$2; $3 -> $filename"
;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: tm-def.el,v 7.66 1996/11/26 18:00:45 shuhei-k Exp $
+;; Version: $Id: tm-def.el,v 7.67 1996/12/27 20:39:43 morioka Exp $
;; Keywords: mail, news, MIME, multimedia, definition
;; This file is part of tm (Tools for MIME).
(tl:overlay-put overlay 'face face)
))
-(setq tm:button-face 'bold)
-(setq tm:mouse-face 'highlight)
+(defvar tm:button-face 'bold
+ "Face used for content-button or URL-button of MIME-Preview buffer.
+\[tm-def.el]")
+
+(defvar tm:mouse-face 'highlight
+ "Face used for MIME-preview buffer mouse highlighting. [tm-def.el]")
(defun tm:add-button (from to func &optional data)
"Create a button between FROM and TO with callback FUNC and data DATA."