Add :error as option to :if-duplicate-do for add-vertex
[cl-graph.git] / cl-graph.asd
index 7cca550..93c2cc0 100644 (file)
@@ -4,16 +4,18 @@
 (defpackage #:cl-graph-system (:use #:cl #:asdf))
 (in-package #:cl-graph-system)
 
-(unless (find-system 'asdf-system-connections nil)
+(unless (or (member :asdf-system-connections *features*)
+           (find-system 'asdf-system-connections nil))
   (warn "The CL-Graph system would enjoy having asdf-system-connections 
 around. See 
 http://www.cliki.net/asdf-system-connections for details and download
 instructions."))
-(when (find-system 'asdf-system-connections nil)
+(when (and (not (member :asdf-system-connections *features*))
+          (find-system 'asdf-system-connections nil))
   (operate 'load-op 'asdf-system-connections))
 
 (defsystem cl-graph
-  :version "0.10.1"
+  :version "0.10.2"
   :author "Gary Warren King <gwking@metabang.com>"
   :maintainer "Gary Warren King <gwking@metabang.com>"
   :licence "MIT Style License"
@@ -35,7 +37,9 @@ instructions."))
                        :depends-on ("graph"))
                 (:file "graph-algorithms"
                        :depends-on ("graph"))
-                                     
+                #+(or)
+                (:file "dynamic-classes"
+                       :depends-on ("graph"))
                 (:static-file "notes.text")
 
                 (:module "graphviz" :depends-on ("graph")
@@ -51,7 +55,8 @@ instructions."))
                      (intern (symbol-name '#:run-tests) :lift)
                      :config :generic))
   :depends-on ((:version :metatilities-base "0.6.0")
-              (:version :cl-containers "0.11.0")
+              (:version :cl-containers "0.12.0")
+              :metabang-bind
               ))
 
 (defmethod operation-done-p 
@@ -69,6 +74,14 @@ instructions."))
                        :depends-on ("graph-and-variates"))))))
 
 #+asdf-system-connections
+(asdf:defsystem-connection cl-graph-and-dynamic-classes
+  :requires (cl-graph dynamic-classes)
+  :components ((:module 
+               "dev"
+               :components
+               ((:file "dynamic-classes")))))
+
+#+asdf-system-connections
 (asdf:defsystem-connection cl-graph-and-cl-graphviz
   :requires (cl-graph cl-graphviz)
   :components ((:module 
@@ -101,14 +114,6 @@ instructions."))
                :components
                ((:file "subgraph-containing")))))
 
-#+asdf-system-connections
-(asdf:defsystem-connection cl-graph-and-dynamic-classes
-  :requires (cl-graph dynamic-classes)
-  :components ((:module 
-               "dev"
-               :components
-               ((:file "dynamic-classes")))))
-