random vis link

src/wanijo/instance/view.clj

@@ -53,7 +53,10 @@
           "Back to List"]
          " | "
          [:a {:href (path :instance-edit-form instance)}
-          "Edit Instance"]]]
+          "Edit Instance"]
+         " | "
+         [:a {:href (path :vis-index)}
+        "Start visualisation"]]]
     (when (seq (:properties instance))
       [:section.properties
        [:h2 "Properties"]
@@ -72,7 +75,7 @@
               (seq (:links-in instance)))
       [:section.visualisation
        [:h2 "Visualisation"]
-       (viz/single-instance instance)])
+       [:p (viz/single-instance instance)]])
     (when (seq (:links-out instance))
       [:section.links-out
        [:h2 "Outgoing Links"]