tm 7.81.

diff --git a/ChangeLog b/ChangeLog
index 20ec0de..27afe3a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,62 @@
+Tue Sep  3 15:02:47 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * tl: Version 7.61.1 was released.
+
+       * ol-to-texi.el: New file.
+
+       * smiley-mule.el (smiley-face-bitmap-list): changed from
+       `smiley-face-bitmap-alist'.
+       (smiley-buffer): put faces.
+       (smiley-encode-buffer): delete faces.
+
+       * smiley-mule.el (smiley-face-bitmap-alist): cdr was changed to
+       composed bitmap string.
+       (smiley-buffer): modified for new `smiley-face-bitmap-alist'
+       format.
+       (smiley-encode-buffer): New function.
+
+Tue Sep  3 12:16:49 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * smiley-mule.el: Merge some bitmaps of Yamaoka's
+       smiley-mule-faces.el. (cf. [tm-ja:2069])
+
+Mon Sep  2 15:54:57 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * TL-ELS: latex-math-symbol.el was moved to MU package.
+
+Mon Sep  2 14:34:00 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * emu-18.el (file-relative-name): New function.
+
+       * mk-tl: Constant `el-file-mode' was abolished.  Function
+       `install-el', `install-el-files', `install-elc' and
+       `install-elc-files' were abolished.
+       (install-tl): Use function `install-elisp-modules'.
+
+       * TL-ELS: Variable `tl-uncompile-el-files', `tl-el-files' and
+       `tl-elc-files' were abolished.
+
+Mon Sep  2 13:10:54 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * TL-ELS: mu-bbdb.el was moved to ../mu/.
+
+       * TL-ELS: std11.el, std11-parse.el tl-822.el and mu-cite.el were
+       moved to ../mu/; mu-replace.el and mu-comment.el were renamed to
+       tu-replace.el and tu-comment.el.
+
+       * tu-replace.el: mu-replace.el was renamed to tu-replace.el.
+
+       * tu-comment.el: mu-comment.el was renamed to tu-comment.el.
+
+Mon Sep  2 08:21:39 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * bitmap.el (bitmap-insert-xbm-file): fixed. (cf. [tm-ja:2057])
+
+Sun Sep  1 16:11:01 1996  Fujikazu OKUNISHI <fuji0924@mbox.kyoto-inet.or.jp>
+       
+       * tl-822.el (rfc822/field-end): fixed a typo. (cf. [tm-ja:2056])
+
+\f
 Sat Aug 31 15:08:42 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
        * tl: Version 7.61 was released.

diff --git a/emu-18.el b/emu-18.el
index 38d7f73..aee6ede 100644 (file)
--- a/emu-18.el
+++ b/emu-18.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-18.el,v 7.21 1996/08/18 17:17:27 morioka Exp $
+;; Version: $Id: emu-18.el,v 7.22 1996/09/02 14:34:00 morioka Exp $
 ;; Keywords: emulation, compatibility
 
 ;; This file is part of tl (Tiny Library).
@@ -193,6 +193,18 @@ to create parent directories if they don't exist.
     (make-directory-internal dir)
     ))
 
+;; Imported from files.el of EMACS 19.33.
+(defun file-relative-name (filename &optional directory)
+  "Convert FILENAME to be relative to DIRECTORY (default: default-directory)."
+  (setq filename (expand-file-name filename)
+       directory (file-name-as-directory (expand-file-name
+                                          (or directory default-directory))))
+  (let ((ancestor ""))
+    (while (not (string-match (concat "^" (regexp-quote directory)) filename))
+      (setq directory (file-name-directory (substring directory 0 -1))
+           ancestor (concat "../" ancestor)))
+    (concat ancestor (substring filename (match-end 0)))))
+
 
 ;;; @ mark
 ;;;