r3031: *** empty log message ***

[xmlutils.git] / debian / xmlutils.asd

diff --git a/debian/xmlutils.asd b/debian/xmlutils.asd
index 9338bd0721d83acf0ed3160d9b418d95e554ae83..7f78010eb5e13de599b69d1f43d1e2b0b725c027 100644 (file)
--- a/debian/xmlutils.asd
+++ b/debian/xmlutils.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Sep 2002
 ;;;;
-;;;; $Id: xmlutils.asd,v 1.1 2002/10/15 13:43:24 kevin Exp $
+;;;; $Id: xmlutils.asd,v 1.2 2002/10/15 13:59:37 kevin Exp $
 ;;;;
 ;;;; This file, part of cl-xmlutils, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -18,6 +18,8 @@
 
 (in-package :asdf)
 
+#-allegro (require :acl-compat)
+
 (defsystem :xmlutils
   :name "cl-xmlutils"
   :author "Franz, Inc"
@@ -30,9 +32,17 @@
            (pushnew :xmlutils cl:*features*))
   
   :components
-  ((:file "xmlutils")))
+  ((:file "phtml")
+   (:file "pxml0")
+   (:file "pxml1" :depends-on ("pxml0"))
+   (:file "pxml2" :depends-on ("pxml1"))
+   (:file "pxml3" :depends-on ("pxml2"))
+   ))
 
 (when (ignore-errors (find-class 'load-compiled-op))
   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :xmlutils))))
     (pushnew :xmlutils cl:*features*)))
 
+(defmethod source-file-type ((c cl-source-file) (s (eql (find-system :xmlutils))))
+  "cl")
+