* (poem-ccl-decode-raw-text): Renamed from `ccl-decode-raw-text'.

(poem-ccl-encode-raw-text): Reanamed from `ccl-encode-raw-text'.
(poem-ccl-encode-raw-text-CRLF): Renamed from `ccl-encode-raw-text-CRLF`.

diff --git a/ChangeLog b/ChangeLog
index 4c10445..1873567 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+1998-12-18  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+       * poem-om.el (poem-ccl-decode-raw-text): Renamed from
+       `ccl-decode-raw-text'.
+       (poem-ccl-encode-raw-text): Reanamed from `ccl-encode-raw-text'.
+       (poem-ccl-encode-raw-text-CRLF): Renamed from
+       `ccl-encode-raw-text-CRLF`.
+
 1998-12-17  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
        * poem-om.el (poem-decode-raw-text): New function for MULE 1.

diff --git a/poem-om.el b/poem-om.el
index 7a4c6fb..7a6b335 100644 (file)
--- a/poem-om.el
+++ b/poem-om.el
@@ -49,7 +49,7 @@
                     0))
               ))))
 
-       (define-ccl-program ccl-decode-raw-text
+       (define-ccl-program poem-ccl-decode-raw-text
         '(1
           ((read r1 r0)
            (loop
@@ -67,13 +67,13 @@
           (write r1))
         "Convert line-break code from CRLF to LF.")
 
-       (define-ccl-program ccl-encode-raw-text
+       (define-ccl-program poem-ccl-encode-raw-text
         '(1
           ((read r0)
            (loop (write-read-repeat r0))))
         "Pass through without any conversions.")
 
-       (define-ccl-program ccl-encode-raw-text-CRLF
+       (define-ccl-program poem-ccl-encode-raw-text-CRLF
         '(2
           ((loop
              (read r0)
@@ -87,13 +87,13 @@
        'raw-text 4 ?=
        "No conversion"
        nil
-       (cons ccl-decode-raw-text ccl-encode-raw-text))
+       (cons poem-ccl-decode-raw-text poem-ccl-encode-raw-text))
 
        (make-coding-system
        'raw-text-dos 4 ?=
        "No conversion"
        nil
-       (cons ccl-decode-raw-text ccl-encode-raw-text-CRLF))
+       (cons poem-ccl-decode-raw-text poem-ccl-encode-raw-text-CRLF))
        )
       (t
        (defun poem-decode-raw-text (from to)