From 3522a3107d03c135abe9efe941e0754a08b47b04 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 18 Dec 1998 05:20:34 +0000 Subject: [PATCH] * (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`. --- ChangeLog | 8 ++++++++ poem-om.el | 10 +++++----- 2 files changed, 13 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4c10445..1873567 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,11 @@ +1998-12-18 Katsumi Yamaoka + + * 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 * 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 --- 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) -- 1.7.10.4