From dc2a6c1c50d7b46a9727ab05d4f67e49bfeaed2a Mon Sep 17 00:00:00 2001 From: akr Date: Tue, 25 Aug 1998 08:08:21 +0000 Subject: [PATCH] * ew-bq.el (ew-ccl-untrusted-eof-block): Set boolean value. --- ChangeLog | 4 ++++ ew-bq.el | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index d89f15d..b2bc23f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 1998-08-25 Tanaka Akira + * ew-bq.el (ew-ccl-untrusted-eof-block): Set boolean value. + +1998-08-25 Tanaka Akira + * ew-bq.el (ew-ccl-use-symbol): New variable. (ew-ccl-untrusted-eof-block): New variable. (ew-make-ccl-coding-system): New function. diff --git a/ew-bq.el b/ew-bq.el index ee957f5..4cbe28d 100644 --- a/ew-bq.el +++ b/ew-bq.el @@ -23,10 +23,10 @@ (let ((status (make-vector 9 nil))) (ccl-execute-on-string (ccl-compile - '(0 (read r0) (r0 = 2))) + '(0 (read r0) (r0 = 1))) status "") - (aref status 0)))) + (= (aref status 0) 0)))) (defun ew-make-ccl-coding-system (coding-system mnemonic doc-string decoder encoder) (make-coding-system -- 1.7.10.4