* mel-ccl.el: Check `ccl-execute-eof-block-on-decoding-some'

facility instead of `ccl-execute-eof-block-on-encoding-some'.

diff --git a/ChangeLog b/ChangeLog
index bcb26d7..e025cc6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1998-10-09  Tanaka Akira <akr@jaist.ac.jp>
+
+       * mel-ccl.el: Check `ccl-execute-eof-block-on-decoding-some'
+       facility instead of `ccl-execute-eof-block-on-encoding-some'.
+
 1998-10-09  MORIOKA Tomohiko  <morioka@jaist.ac.jp>
 
        * mel-b.el (base64-characters): Enclose with `eval-and-compile'.

diff --git a/mel-ccl.el b/mel-ccl.el
index e50ad5f..655439c 100644 (file)
--- a/mel-ccl.el
+++ b/mel-ccl.el
@@ -1173,7 +1173,7 @@ abcdefghijklmnopqrstuvwxyz\
 ;;; @ B
 ;;;
 
-(unless-broken ccl-execute-eof-block-on-encoding-some
+(unless-broken ccl-execute-eof-block-on-decoding-some
 
   (defun base64-ccl-encode-string (string)
     "Encode STRING with base64 encoding."
@@ -1237,7 +1237,7 @@ abcdefghijklmnopqrstuvwxyz\
 ;;; @ quoted-printable
 ;;;
 
-(unless-broken ccl-execute-eof-block-on-encoding-some
+(unless-broken ccl-execute-eof-block-on-decoding-some
 
   (defun quoted-printable-ccl-encode-string (string)
     "Encode STRING with quoted-printable encoding."