tm 7.88.

diff --git a/ChangeLog b/ChangeLog
index e495fb1..a838261 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,19 @@
+Tue Sep 24 22:02:05 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * tl: Version 7.61.8 was released.
+
+Mon Sep 23 20:38:05 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
+
+       * emu-x20.el, emu-mule.el (set-buffer-file-coding-system): New
+       alias.
+
+       * emu-e19.el (set-buffer-file-coding-system): Renamed from
+       `set-file-coding-system'.
+
+       * emu-nemacs.el (set-buffer-file-coding-system): New alias for
+       `set-kanji-fileio-code'; renamed from `set-file-coding-system'.
+
+\f
 Mon Sep 23 17:44:23 1996  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
        * tl: Version 7.61.7 was released.

diff --git a/emu-e19.el b/emu-e19.el
index f9bd6a1..3933e14 100644 (file)
--- a/emu-e19.el
+++ b/emu-e19.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-e19.el,v 7.38 1996/09/23 14:55:53 morioka Exp $
+;; Version: $Id: emu-e19.el,v 7.39 1996/09/23 20:33:19 morioka Exp $
 ;; Keywords: emulation, compatibility, mule, Latin-1
 
 ;; This file is part of tl (Tiny Library).
@@ -122,7 +122,9 @@
 \[emu-e19.el; Emacs 20 emulating function]"
   )
 
-(defun set-file-coding-system (coding-system &optional force)
+(defun set-buffer-file-coding-system (coding-system &optional force)
+  "Set buffer-file-coding-system of the current buffer to CODING-SYSTEM.
+\[emu-e19.el; Emacs 20 emulating function]"
   )
 
 (defmacro as-binary-process (&rest body)

diff --git a/emu-mule.el b/emu-mule.el
index c2e5a69..12a3ac6 100644 (file)
--- a/emu-mule.el
+++ b/emu-mule.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-mule.el,v 7.55 1996/09/23 17:43:43 morioka Exp $
+;; Version: $Id: emu-mule.el,v 7.56 1996/09/23 20:34:34 morioka Exp $
 ;; Keywords: emulation, compatibility, Mule
 
 ;; This file is part of tl (Tiny Library).
@@ -93,6 +93,8 @@
 
 (defalias 'detect-coding-region 'code-detect-region)
 
+(defalias 'set-buffer-file-coding-system 'set-file-coding-system)
+
 (defmacro as-binary-process (&rest body)
   (` (let (selective-display   ; Disable ^M to nl translation.
           ;; Mule

diff --git a/emu-nemacs.el b/emu-nemacs.el
index 5903de1..bf9815b 100644 (file)
--- a/emu-nemacs.el
+++ b/emu-nemacs.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-nemacs.el,v 7.47 1996/09/23 17:43:04 morioka Exp $
+;; Version: $Id: emu-nemacs.el,v 7.48 1996/09/23 20:31:12 morioka Exp $
 ;; Keywords: emulation, compatibility, NEmacs, mule
 
 ;; This file is part of tl (Tiny Library).
@@ -155,9 +155,7 @@
       *euc-japan*
     ))
 
-(defun set-file-coding-system (coding-system &optional force)
-  (set-kanji-fileio-code coding-system)
-  )
+(defalias 'set-buffer-file-coding-system 'set-kanji-fileio-code)
 
 (defmacro as-binary-process (&rest body)
   (` (let (selective-display   ; Disable ^M to nl translation.

diff --git a/emu-x20.el b/emu-x20.el
index 5b99ae0..e642429 100644 (file)
--- a/emu-x20.el
+++ b/emu-x20.el
@@ -4,7 +4,7 @@
 ;; Copyright (C) 1994,1995,1996 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-x20.el,v 7.36 1996/09/18 08:55:56 morioka Exp $
+;; Version: $Id: emu-x20.el,v 7.37 1996/09/23 20:38:05 morioka Exp $
 ;; Keywords: emulation, compatibility, Mule, XEmacs
 
 ;; This file is part of tl (Tiny Library).
@@ -20,8 +20,8 @@
 ;; General Public License for more details.
 
 ;; You should have received a copy of the GNU General Public License
-;; along with This program; see the file COPYING.  If not, write to
-;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 ;; Boston, MA 02111-1307, USA.
 
 ;;; Code:
@@ -92,6 +92,8 @@ in the region between START and END.
 (defconst *euc-kr* 'euc-kr)
 (defconst *koi8*   'koi8)
 
+(defalias 'set-buffer-file-coding-system 'set-file-coding-system)
+
 (defmacro as-binary-process (&rest body)
   `(let (selective-display     ; Disable ^M to nl translation.
         process-input-coding-system