update on readme, moar titles, correction in last migration

README.md

@@ -42,7 +42,7 @@ When started via its `main` method, as is the uberjar case, an nREPL server is s
 To connect via the command line, use the following command:
 
 ```
-clj -Sdeps '{:deps {nrepl {:mvn/version "0.7.0"}}}' -m nrepl.cmdline --connect --host host --port port
+clj -Sdeps '{:deps {nrepl/nrepl {:mvn/version "0.7.0"}}}' -m nrepl.cmdline --connect --host host --port port
 ```
 
 ### "Architecture"

src/wanijo/infrastructure/repl.clj

@@ -24,9 +24,9 @@
          c.last_migration = ''")
 
 (neo4j/defquery merge-config
-  "UPDATE (c:dbconfig)
+  "MATCH (c:dbconfig)
-      SET c.last_migration = {now},
+     SET c.last_migration = {now},
-          c.db_version = {version}")
+         c.db_version = {version}")
 
 (neo4j/defquery config
   "MATCH (c:dbconfig) RETURN c")
@@ -96,9 +96,9 @@
 (defn run-migrations! []
   (neo4j/exec-query! init-config {:now (neo4j/now-str)})
   (let [version (-> (neo4j/exec-query! config {})
-                   first
+                    first
-                   :c
+                    :c
-                   :db_version)]
+                    :db_version)]
     (println "got version" version "from db," (count migrations) "available")
     (when-let [to-run (nthrest migrations version)]
       (println "running" (count to-run) "migrations")

src/wanijo/infrastructure/view.clj

@@ -42,7 +42,7 @@
       [:meta {:charset "utf-8"}]
       [:meta {:name "viewport"
               :content "width=device-width,initial-scale=1,shrink-to-fit=no"}]
-      [:title (str "wan ijo" (when title (str " - " title)))]
+      [:title (h (str (when title (str title " - ")) "wanijo"))]
       (include-css "/css/app.css")
       (when devmode? (include-css "/css/devmode.css"))
       (include-js "/js/scripts.js")

src/wanijo/instance/view/edit.clj

@@ -11,6 +11,7 @@
 (defn edit [instance form form-data schemas req]
   (view/layout
     :request req
+    :title (str (:name instance) " - " (-> instance :schema :name))
     :content
     [[:h1
       (h (-> instance :schema :name))

src/wanijo/instance/view/instances.clj

@@ -10,6 +10,7 @@
 (defn instances [schema instances new-form req]
   (view/layout
     :request req
+    :title (:name schema)
     :content
     [[:h1 "All Instances of schema "
       [:span.schema-title__name (h (:name schema))]]

src/wanijo/instance/view/link_selection.clj

@@ -8,6 +8,7 @@
 (defn link-selection [instance schema form req]
   (view/layout
     :request req
+    :title (str (:name instance) " - " (-> instance :schema :name))
     :content
     [[:h1
       [:small "Link " (-> instance :schema :name h) " "]

src/wanijo/instance/view/show.clj

@@ -39,6 +39,7 @@
 (defn show [instance schemas req]
   (view/layout
     :request req
+    :title (str (:name instance) " - " (-> instance :schema :name))
     :content
     [[:h1
       (if (:starred instance)