removing historical implementation

[clinton/lisp-on-lines.git] / lisp-on-lines.asd

diff --git a/lisp-on-lines.asd b/lisp-on-lines.asd
index 12306c7..4e98728 100644 (file)
--- a/lisp-on-lines.asd
+++ b/lisp-on-lines.asd
@@ -9,16 +9,48 @@
 (in-package :coop.tech.systems)
 
 (defsystem :lisp-on-lines
+  :license 
+"Copyright (c) 2004-2007 Drew Crampsie
+
+Contains portions of ContextL: 
+Copyright (c) 2005 - 2007 Pascal Costanza
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the \"Software\"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or
+sell copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE."
   :components ((:static-file "lisp-on-lines.asd")
-              (:module :patches                          
-                       :components ((:file "yaclml")
-                                    (:file "ucw")
-                                    (:file "clsql")))
+              
               (:module :src
                        :components ((:file "packages")
-                                    (:file "special-initargs")
-                                    (:file "properties")                                      
-                                    (:file "mewa")
+                                    (:file "utilities")
+                                    (:file "display")
+                                    
+                                    (:file "attributes")
+
+                                    (:file "description-class")
+                                    (:file "description")
+                                    
+
+                                    (:file "description-test")
+                                    (:file "attribute-test")
+#|                                  (:file "mewa")
                                     (:file "lisp-on-lines")  
                                     (:file "defdisplay")
                                     (:file "standard-display")
@@ -33,16 +65,23 @@
                                                           (:file "relational-attributes")
                                                           (:file "dojo-attributes"))
                                              :serial t)
+                                    (:module :displays
+                                             :components ((:file "inspector"))
+                                             
+                                                          :serial t)
                                     (:module :validation
                                              :components
                                              ((:file "validation")
                                               (:file "standard-validation")
                                               (:file "email-address"))
-                                             :serial t)
+                                             :serial t)|#
                                     )
                        :serial t))
   :serial t
-  :depends-on (:arnesi :ucw :meta-model :split-sequence :contextl :cl-ppcre :cl-fad))
+  :depends-on (:contextl
+              :stefil
+              :arnesi ;:ucw :stefil :meta-model :split-sequence  :cl-ppcre :cl-fad
+              ))
 
 (defsystem :lisp-on-lines.example
     :components (