add xml-class-config package and author to asd

slyrus · May 18, 2012 · 263c931 · 263c931
1 parent a7cbedc
commit 263c931
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/xml-class.asd b/xml-class.asd
@@ -2,6 +2,7 @@
 (asdf:defsystem #:xml-class
   :name "xml-class"
   :description "Metaclass for working with XML documents"
+  :author "Orignally by Hans Huebner. Adopted and adapted by Cyrus Harmon."
   :version "0.0.1"
   :licence "BSD"
   :depends-on (closer-mop alexandria local-time cxml cxml-stp)
@@ -11,3 +12,9 @@
    (:cl-source-file "xml-utilities")
    (:cl-source-file "xml-class")))
 
+(cl:defpackage #:xml-class-config
+  (:export #:*base-directory*))
+
+(cl:defparameter xml-class-config::*base-directory*
+  (make-pathname :name nil :type nil :defaults *load-truename*))
+