From 87bc8282a36a59e7486cc6f6a97f419f67849220 Mon Sep 17 00:00:00 2001 From: akr Date: Thu, 27 Aug 1998 04:32:57 +0000 Subject: [PATCH] * emu-e20.el (ccl-use-symbol-as-program): Use `ccl-vector-program-execute-on-string' if it is defined. --- ChangeLog | 5 +++++ emu-e20.el | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 6344fbd..d36fc7a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,11 @@ 1998-08-27 Tanaka Akira * emu-e20.el (ccl-use-symbol-as-program): Use + `ccl-vector-program-execute-on-string' if it is defined. + +1998-08-27 Tanaka Akira + + * emu-e20.el (ccl-use-symbol-as-program): Use `ccl-execute-on-string' instead of `make-coding-system' for avoiding the error "Coding system already exists". diff --git a/emu-e20.el b/emu-e20.el index 7ac0bda..70a67ac 100644 --- a/emu-e20.el +++ b/emu-e20.el @@ -174,7 +174,10 @@ TABLE defaults to the current buffer's category table." '(1 ((read r0) (loop (write-read-repeat r0))))) (condition-case nil (progn - (ccl-execute-on-string + (funcall + (if (fboundp 'ccl-vector-program-execute-on-string) + 'ccl-vector-program-execute-on-string + 'ccl-execute-on-string) 'ew-ccl-identity-program (make-vector 9 nil) "") -- 1.7.10.4