From 8bda25d4a95bac9acea4c6d3f3123a15730ddbb5 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Thu, 9 Apr 1998 15:28:13 +0000
Subject: [PATCH] Modify comments.

---
 emu-e19.el    |   15 ++-------------
 emu-nemacs.el |   15 ++-------------
 2 files changed, 4 insertions(+), 26 deletions(-)

diff --git a/emu-e19.el b/emu-e19.el
index d4b9360..ce75ddf 100644
--- a/emu-e19.el
+++ b/emu-e19.el
@@ -248,23 +248,12 @@ find-file-hooks, etc.
   "Return number of columns a CHAR occupies when displayed."
   1)
 
+(defalias 'char-length 'char-bytes)
+
 (defmacro char-next-index (char index)
   "Return index of character succeeding CHAR whose index is INDEX."
   (` (1+ index)))
 
-;;; @@ Mule emulating aliases
-;;;
-;;; You should not use them.
-
-;;(defalias 'char-leading-char 'char-charset)
-
-;;; @@ obsoleted aliases
-;;;
-;;; You should not use them.
-
-(defalias 'char-length 'char-bytes)
-;;(defalias 'char-columns 'char-width)
-
 
 ;;; @ string
 ;;;
diff --git a/emu-nemacs.el b/emu-nemacs.el
index 77bfc0a..91ee9d5 100644
--- a/emu-nemacs.el
+++ b/emu-nemacs.el
@@ -335,23 +335,12 @@ find-file-hooks, etc.
       1
     2))
 
+(defalias 'char-length 'char-bytes)
+
 (defmacro char-next-index (char index)
   "Return index of character succeeding CHAR whose index is INDEX."
   (` (1+ index)))
 
-;;; @@ Old Mule emulating aliases
-;;;
-;;; You should not use them.
-
-;;(defalias 'char-leading-char 'char-charset)
-
-;;; @@ obsoleted aliases
-;;;
-;;; You should not use them.
-
-(defalias 'char-length 'char-bytes)
-;;(defalias 'char-columns 'char-width)
-
 
 ;;; @ string
 ;;;
-- 
1.7.10.4