X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=dev%2Fgraphviz%2Fgraphviz-support.lisp;h=a27a34b72c66d84e50431c7bbf407da14866fee3;hb=60a6a5dc8344e67aef8c8903c3cacc58a1f2315d;hp=99b8f7b1d2d6e3544e6b43cac0a70638cd568023;hpb=c9c290dd139941dfc72826b6854607c0c304f7ca;p=cl-graph.git

diff --git a/dev/graphviz/graphviz-support.lisp b/dev/graphviz/graphviz-support.lisp
index 99b8f7b..a27a34b 100644
--- a/dev/graphviz/graphviz-support.lisp
+++ b/dev/graphviz/graphviz-support.lisp
@@ -250,6 +250,7 @@ B--D []
     (:nodesep float)
     (:ranksep float)
     (:ordering (:out))
+    (:overlap :text)
     (:rankdir ("LR" "RL" "BT"))
     (:pagedir text)
     (:rank (:same :min :max))
@@ -259,7 +260,8 @@ B--D []
     (:mclimit float)
     (:layers text)
     (:color text)
-    (:bgcolor text)))
+    (:bgcolor text)
+    (:fontname text)))
 
 (defparameter *dot-vertex-attributes*
   '((:pos coordinate)
@@ -278,7 +280,8 @@ B--D []
     (:fillcolor text)
     (:style (:filled :solid :dashed :dotted :bold :invis))
     (:layer text)
-    (:url text)))
+    (:url text)
+    (:peripheries integer)))
 
 (defparameter *dot-edge-attributes*
   '((:pos spline)