From: ueno <ueno>
Date: Fri, 27 Sep 2002 00:31:11 +0000 (+0000)
Subject: * liece-misc.el: Don't require pccl and broken.
X-Git-Tag: liece-1_4_9~11
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=387802f699feb002e6877212dfe7176da00584e6;p=elisp%2Fliece.git

* 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.
---

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))