@ -26,7 +26,7 @@
clojure.string/trim-newline
clojure.string/split-lines
(map clojure.string/trim)
(filter #(> (count %) 0))
(filter #(pos? (count %)))
(clojure.string/join \newline)))
(defn exec-query! [qry params]
@ -6,9 +6,9 @@
(defn btnlink
([target caption]
(btnlink target caption ""))
([target caption class]
([target caption clss]
[:a {:href target}
[:button {:class class}
[:button {:class clss}
caption]]))
(defn layout!
@ -32,12 +32,12 @@
SET s.created_at = {created_at}
RETURN s")
(defn create-new! [name user-uuid]
(defn create-new! [schema-name user-uuid]
(->>
(neo4j/exec-query!
create-new
{:u_uuid user-uuid
:name name
:name schema-name
:s_uuid (neo4j/uuid)
:created_at (neo4j/now-str)})
first