From 387802f699feb002e6877212dfe7176da00584e6 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Fri, 27 Sep 2002 00:31:11 +0000
Subject: [PATCH] * liece-misc.el: Don't require pccl and broken. *
 liece-modules.el: Don't compile liece-q-ccl.el. *
 liece-ctcp.el: Don't require liece-q-ccl.el.

---
 lisp/ChangeLog        |    9 +++++++++
 lisp/liece-ctcp.el    |    9 +++++----
 lisp/liece-misc.el    |    2 --
 lisp/liece-modules.el |    6 +++---
 4 files changed, 17 insertions(+), 9 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dbfc369..8a1a4ba 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -104,6 +104,15 @@
 
 	* gettext.el (gettext-mapcar*): Eliminate recursion.
 
+2002-04-08  Daiki Ueno  <daiki@xemacs.org>
+
+	* liece-misc.el: Don't require pccl and broken.
+
+2002-04-07  Daiki Ueno  <daiki@xemacs.org>
+
+	* liece-modules.el: Don't compile liece-q-ccl.el.
+	* liece-ctcp.el: Don't require liece-q-ccl.el.
+
 2002-03-24  Daiki Ueno  <daiki@xemacs.org>
 
 	* liece-coding.el (liece-mime-charset-for-write): Use
diff --git a/lisp/liece-ctcp.el b/lisp/liece-ctcp.el
index 238f8ec..b8da665 100644
--- a/lisp/liece-ctcp.el
+++ b/lisp/liece-ctcp.el
@@ -33,11 +33,12 @@
 
 (require 'liece-handler)
 
-(require 'pccl)
+;; (require 'pccl)
 
-(if-broken ccl-usable
-    (require 'liece-q-el)
-  (require 'liece-q-ccl))
+;; (if-broken ccl-usable
+;;     (require 'liece-q-el)
+;;   (require 'liece-q-ccl))
+(require 'liece-q-el)
 
 (require 'liece-x-face)
 
diff --git a/lisp/liece-misc.el b/lisp/liece-misc.el
index 7f17632..d69f011 100644
--- a/lisp/liece-misc.el
+++ b/lisp/liece-misc.el
@@ -30,8 +30,6 @@
 ;;; Code:
 
 (eval-and-compile
-  (require 'broken)
-  (require 'pccl)
   (require 'invisible)
   (require 'liece-inlines)
   (require 'liece-coding))
diff --git a/lisp/liece-modules.el b/lisp/liece-modules.el
index a41cd08..0f9940d 100644
--- a/lisp/liece-modules.el
+++ b/lisp/liece-modules.el
@@ -71,9 +71,9 @@
 (if (fboundp 'set-face-stipple)
     (push 'bitmap-stipple liece-modules-to-compile))
 
-(require 'pccl)
-(unless-broken ccl-usable
-  (push 'liece-q-ccl liece-modules-to-compile))
+;; (require 'pccl)
+;; (unless-broken ccl-usable
+;;   (push 'liece-q-ccl liece-modules-to-compile))
 
 (setq liece-modules (cons 'liece-setup liece-modules-to-compile))
 
-- 
1.7.10.4