From cd1ddd435b21e28b8f37b91bb5b7c7b85924c3f6 Mon Sep 17 00:00:00 2001 From: akr Date: Sat, 19 Sep 1998 00:46:43 +0000 Subject: [PATCH] * mel-ccl.el (q-encoding-ccl-encoded-length): Check (featurep 'xemacs) instead of running-xemacs. --- ChangeLog | 5 +++++ mel-ccl.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 81f1c4c..0037058 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,10 @@ 1998-09-19 Tanaka Akira + * mel-ccl.el (q-encoding-ccl-encoded-length): Check + (featurep 'xemacs) instead of running-xemacs. + +1998-09-19 Tanaka Akira + * mel-ccl.el (base64-ccl-insert-encoded-file): Use `mel-ccl-base64-lf-rev' instead of `mel-ccl-b-rev'. diff --git a/mel-ccl.el b/mel-ccl.el index 3412a94..6ff0dc4 100644 --- a/mel-ccl.el +++ b/mel-ccl.el @@ -1275,7 +1275,7 @@ MODE allows `text', `comment', `phrase' or nil. Default value is string 'mel-ccl-uq-rev)) -(unless running-xemacs +(unless (featurep 'xemacs) (defun q-encoding-ccl-encoded-length (string &optional mode) (let ((status [nil nil nil nil nil nil nil nil nil])) (fillarray status nil) -- 1.7.10.4