From c5d89f3767cc1ab01c3cc3949bdc52fa87cf2332 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Sun, 1 Jun 2003 04:38:28 +0000
Subject: [PATCH] Undo.

---
 lisp/COMPILE |   69 ++++++++++++++++++++++++++++------------------------------
 1 file changed, 33 insertions(+), 36 deletions(-)

diff --git a/lisp/COMPILE b/lisp/COMPILE
index cf8a595..153f1fa 100644
--- a/lisp/COMPILE
+++ b/lisp/COMPILE
@@ -5,48 +5,45 @@
 	(cons (if (featurep 'xemacs)
 		  'riece-xemacs
 		'riece-emacs)
-	      (append
-	       '(riece-globals
-		 riece-options
-		 riece-version
-		 riece-inlines
-		 riece-coding
-		 riece-complete
+	      '(riece-globals
+		riece-options
+		riece-version
+		riece-inlines
+		riece-coding
+		riece-complete
 
-		 ;; riece-identity -+-> riece-channel
-		 ;;                 +-> riece-user
-		 riece-identity
-		 riece-channel
-		 riece-user
+		;; riece-identity -+-> riece-channel
+		;;                 +-> riece-user
+		riece-identity
+		riece-channel
+		riece-user
 
-		 riece-misc
-		 riece-display
-		 riece-server
+		riece-misc
+		riece-display
+		riece-server
 
-		 ;; riece-channel -+-> riece-naming
-		 ;; riece-user    -+
-		 riece-naming
-		 riece-message
+		;; riece-channel -+-> riece-naming
+		;; riece-user    -+
+		riece-naming
+		riece-message
 
-		 ;; riece-filter calls riece-{handle,000,200,300,400,500}
-		 riece-filter
-		 riece-handle
-		 riece-000
-		 riece-200
-		 riece-300
-		 riece-400
-		 riece-500
+		;; riece-filter calls riece-{handle,000,200,300,400,500}
+		riece-filter
+		riece-handle
+		riece-000
+		riece-200
+		riece-300
+		riece-400
+		riece-500
 
-		 riece-commands
-		 riece
+		riece-commands
+		riece
 
-		 ;; add-ons
-		 riece-ctcp
-		 riece-highlight
-		 riece-url
-		 riece-unread)
-	       (if (fboundp 'make-network-process)
-		   '(riece-ndcc))))))
+		;; add-ons
+		riece-ctcp
+		riece-highlight
+		riece-url
+		riece-unread))))
 
 (defun riece-compile-modules (modules)
   (let ((load-path (cons nil load-path)))
-- 
1.7.10.4