Permalink
Browse files

* poem-20.el, poem-e20_2.el, poem-ltn1.el, poem-nemacs.el, poem-om.el

(find-file-noselect-as-coding-system): Be CODING-SYSTEM the 1st arg.
(insert-file-contents-as-coding-system): Likewise.
* poem-20.el, poem-ltn1.el, poem-nemacs.el, poem-om.el
(write-region-as-coding-system): Likewise.
  • Loading branch information...
1 parent aa5ed66 commit dcebdbd2fd6899b7f2a1b780f1b7cb3d0b11220e yamaoka committed Dec 14, 1998
Showing with 164 additions and 238 deletions.
  1. +0 −53 ChangeLog
  2. +2 −0 pccl-20.el
  3. +6 −4 pccl-om.el
  4. +156 −181 poem-om.el
View
@@ -1,56 +1,3 @@
-1998-12-17 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * poem-om.el (poem-decode-raw-text): New function for MULE 1.
- (poem-encode-raw-text-CRLF): Likewise.
- (raw-text): New coding-system for MULE 1.
- (raw-text-dos): Likewise.
- (insert-file-contents-as-raw-text): Share implementation.
- (write-region-as-raw-text-CRLF): Likewise.
- (find-file-noselect-as-raw-text): Likewise.
-
-1998-12-17 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * poem-om.el: Share definition of coding-system `binary'.
- (write-region-as-binary): Share implementation.
- (find-file-noselect-as-binary): Likewise.
-
-1998-12-16 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * poem-om.el (insert-file-contents-as-binary): Share
- implementation.
-
-1998-12-16 Katsumi Yamaoka <yamaoka@jpl.org>
-
- * poem-om.el (find-file-noselect-as-raw-text): Use
- `find-file-noselect-as-coding-system' under Mule 2.*.
- (find-file-noselect-as-binary): Likewise.
- (insert-file-contents-as-raw-text): Use
- `insert-file-contents-as-coding-system' under Mule 2.*.
- (insert-file-contents-as-binary): Likewise.
- (write-region-as-raw-text-CRLF): Use
- `write-region-as-coding-system' under Mule 2.*.
- (write-region-as-binary): Likewise.
- (truncate-string): Use `defun-maybe'.
- (toplevel): Don't refer to `running-emacs-19_29-or-later', use
- `emacs-major-version' and `emacs-minor-version' instead.
-
-1998-12-16 Katsumi Yamaoka <yamaoka@jpl.org>
-
- * pccl-om.el (toplevel): Don't require `poem'.
- Use `code-convert-string' instead of `encode-coding-string' or
- `decode-coding-string'.
-
- * poem-om.el (binary): EMACS 20 emulating coding-system for Mule
- 2.3 based on Emacs 19.[28-34].
- (raw-text): EMACS 20 emulating coding-system based on native CCL
- for Mule 2.3 based on Emacs 19.[28-34].
- (raw-text-dos): Likewise.
- (find-file-noselect-as-binary): Separate for some Mules.
-
-1998-12-15 Tanaka Akira <akr@jaist.ac.jp>
-
- * pccl-20.el: Do not require 'poem.
-
1998-12-14 Katsumi Yamaoka <yamaoka@jpl.org>
* poem-20.el, poem-e20_2.el, poem-ltn1.el, poem-nemacs.el, poem-om.el
View
@@ -25,6 +25,8 @@
;;; Code:
+(require 'poem)
+
(eval-when-compile (require 'ccl))
(require 'broken)
View
@@ -26,6 +26,8 @@
;;; Code:
+(require 'poem)
+
(eval-when-compile (require 'ccl))
(require 'broken)
@@ -80,19 +82,19 @@ If CCL-PROG is symbol, it is dereferenced.
(broken-facility ccl-execute-eof-block-on-encoding-null
"Emacs forgets executing CCL_EOF_BLOCK with encoding on empty input."
- (equal (code-convert-string "" *internal* 'test-ccl-eof-block-cs) "[EOF]"))
+ (equal (encode-coding-string "" 'test-ccl-eof-block-cs) "[EOF]"))
(broken-facility ccl-execute-eof-block-on-encoding-some
"Emacs forgets executing CCL_EOF_BLOCK with encoding on non-empty input."
- (equal (code-convert-string "a" *internal* 'test-ccl-eof-block-cs) "a[EOF]"))
+ (equal (encode-coding-string "a" 'test-ccl-eof-block-cs) "a[EOF]"))
(broken-facility ccl-execute-eof-block-on-decoding-null
"Emacs forgets executing CCL_EOF_BLOCK with decoding on empty input."
- (equal (code-convert-string "" 'test-ccl-eof-block-cs *internal*) "[EOF]"))
+ (equal (decode-coding-string "" 'test-ccl-eof-block-cs) "[EOF]"))
(broken-facility ccl-execute-eof-block-on-decoding-some
"Emacs forgets executing CCL_EOF_BLOCK with decoding on non-empty input."
- (equal (code-convert-string "a" 'test-ccl-eof-block-cs *internal*) "a[EOF]"))
+ (equal (decode-coding-string "a" 'test-ccl-eof-block-cs) "a[EOF]"))
(broken-facility ccl-execute-eof-block-on-encoding
"Emacs may forget executing CCL_EOF_BLOCK with encoding."
Oops, something went wrong.

0 comments on commit dcebdbd

Please sign in to comment.