Some graphviz related changes
[cl-graph.git] / dev / graphviz / graphviz-support-optional.lisp
index f281576..9b4c2f1 100644 (file)
@@ -13,7 +13,7 @@ loaded when cl-graphviz is available.
 
 |#
 
-(in-package metabang.graph)
+(in-package #:metabang.graph)
 
 ;; TODO these are hacks to be removed later,
 ;; the functionality should be provided by graph itself
@@ -31,7 +31,7 @@ loaded when cl-graphviz is available.
                      :graph-visitor
                      (lambda (dot-graph)
                        (setf (dot-attribute-value :bb g)
-                             (graphviz:graph-bounding-box dot-graph)))
+                               (graphviz:graph-bounding-box dot-graph)))
 
                      :node-visitor
                      (lambda (node)