-;;; -*- lisp -*-
-
-(eval-when (:compile-toplevel :load-toplevel :execute)
- (unless (find-package :coop.tech.lisp-on-lines.system)
- (defpackage :coop.tech.lisp-on-lines.system
- (:documentation "ASDF System package for meta-model.")
- (:use :common-lisp :asdf))))
-
-(in-package :coop.tech.lisp-on-lines.system)
-
-(defsystem :meta-model
- :components (
- (:module :src
- :components ((:file "packages")
- (:file "meta-model" :depends-on ("packages"))))
- (:module :backend
- :depends-on (:src)
- :pathname "src/backend/"
- :components ((:file "clsql"))))
- :depends-on (:clsql))
-
-;; this is no longer used
-(defsystem :meta-model-clsql
- :components ()
- :depends-on (:meta-model :clsql))
-
-(defsystem :mewa
- :components ((:module :src
- :pathname "src/mewa/"
- :components
- ((:file "mewa")
- (:file "presentations" :depends-on ("mewa"))
- (:file "slot-presentations" :depends-on ("presentations")))))
- :depends-on (:ucw :meta-model))
-
-(defsystem :lisp-on-lines
- :components ((:static-file "lisp-on-lines.asd")
- (:module :src
- :components ((:file "lisp-on-lines")))
- (:module :components
- :pathname "src/components/"
- :components ((:file "range-list"))))
-:depends-on (:meta-model :mewa))
+;;; -*- lisp -*-
+
+(eval-when (:compile-toplevel :load-toplevel :execute)
+ (unless (find-package :coop.tech.systems)
+ (defpackage :coop.tech.systems
+ (:documentation "ASDF System package for meta-model.")
+ (:use :common-lisp :asdf))))
+
+(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 :src
+ :components ((:file "packages")
+ (: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")
+ (:file "standard-occurence")
+ (:file "standard-wrappers")
+ (:file "lines")
+ (:file "defdescription")
+ (:module :attributes
+ :components (
+ (:file "standard-attributes")
+ (:file "numbers")
+ (: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
+ :depends-on (:contextl
+ :stefil
+ :arnesi ;:ucw :stefil :meta-model :split-sequence :cl-ppcre :cl-fad
+ ))
+
+(defsystem :lisp-on-lines.example
+ :components (
+ (:file "reddit-example"))
+
+ :depends-on (:lisp-on-lines))