r10872: Automated commit for Debian build of lml2 upstream-version-1.5.5
authorKevin M. Rosenberg <kevin@rosenberg.net>
Tue, 17 Jan 2006 21:33:52 +0000 (21:33 +0000)
committerKevin M. Rosenberg <kevin@rosenberg.net>
Tue, 17 Jan 2006 21:33:52 +0000 (21:33 +0000)
ChangeLog
debian/changelog
lml2-tests.asd
lml2.asd

index 0e99056cf283f64a8e6c617e5dd37c0d186a7388..dc8a5ce6cf057e9b4fef35bd0dcc9d956d0de0af 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2006-01-17  Kevin M. Rosenberg  <kevin@rosenberg.net>
+       * cl-lml2.asd: Apply modified patch from Gary King
+       so that asdf:test-op always performs test.
+       
 2005-09-03  Kevin M. Rosenberg  <kevin@rosenberg.net>
        * files.lisp: Apply patch from Gary King to 
        identify output files
index ebb87608c6a9c5534c40c780fafa26d8813f18d9..141fb8d3cc74ba59b4f4f0ac16380897453c30f3 100644 (file)
@@ -1,3 +1,9 @@
+cl-lml2 (1.5.5-1) unstable; urgency=low
+
+  * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Tue, 17 Jan 2006 14:32:39 -0700
+
 cl-lml2 (1.5.4-2) unstable; urgency=low
 
   * New upstream URI
index 9d220bae9d4e6e51d179975b1b2719c104402808..1a1a603ea68719b05f978e2e7258aa8cd99c4410 100644 (file)
@@ -16,8 +16,8 @@
 
 (defsystem lml2-tests
     :depends-on (:rt :lml2)
-    :components
-    ((:file "tests")))
+    :in-order-to ((test-op (load-op lml2-tests)))
+    :components ((:file "tests")))
 
 (defmethod perform ((o test-op) (c (eql (find-system 'lml2-tests))))
   (or (funcall (intern (symbol-name '#:do-tests)
index 9d95bdeb3492ebd5493c77907c474cb13f566494..af200b9d4f06589af0d9062fbf6456a7b4dd1b4d 100644 (file)
--- a/lml2.asd
+++ b/lml2.asd
@@ -30,7 +30,7 @@
   :long-description "LML2 provides creation of XHTML for Lisp programs."
 
   :depends-on (kmrcl)
-  
+
   :components
   ((:file "package")
    (:file "data" :depends-on ("package"))
@@ -47,3 +47,6 @@
 (defmethod perform ((o test-op) (c (eql (find-system 'lml2))))
   (operate 'load-op 'lml2-tests)
   (operate 'test-op 'lml2-tests))
+
+(defmethod operation-done-p ((o test-op) (c (eql (find-system 'lml2-tests))))
+  (values nil))