Add new attributes
This commit is contained in:
parent
5186a84010
commit
8819987c5f
|
|
@ -1,11 +1,12 @@
|
|||
(def attr-map @{
|
||||
:rankdir ["rankdir" false]
|
||||
:newrank ["newrank" false]
|
||||
:rank ["rank" false]
|
||||
:label ["label" true]
|
||||
:shape ["shape" false]
|
||||
:group ["group" true]
|
||||
:fillcolor ["fillcolor" false]
|
||||
:style ["filled" true] })
|
||||
:style ["style" true] })
|
||||
|
||||
(defn attr-to-string [attr attr-value]
|
||||
(def name (get attr 0))
|
||||
|
|
|
|||
Loading…
Reference in New Issue
Block a user