merged.

src/clj/auto_ap/server.clj

@@ -2,17 +2,17 @@
   (:require #_[auto-ap.background.mail :refer [always-process-sqs]]
             [auto-ap.handler :refer [app]]
             [auto-ap.ledger :refer [process-all]]
-            [clojure.tools.nrepl.server :refer [start-server stop-server]]
+            [nrepl.server :refer [start-server stop-server]]
             [config.core :refer [env]]
             [ring.adapter.jetty :refer [run-jetty]])
   (:gen-class))
 
-(defn cider-nrepl-handler []
+#_(defn cider-nrepl-handler []
   (require 'cider.nrepl)
   (ns-resolve 'cider.nrepl 'cider-nrepl-handler))
 
  (defn -main [& args]
-   (start-server :port 9000 :bind "0.0.0.0" :handler (cider-nrepl-handler))
+   (start-server :port 9000 :bind "0.0.0.0" #_#_:handler (cider-nrepl-handler))
    (let [port (Integer/parseInt (or (env :port) "3000"))]
      (future (process-all))
      #_(future (always-process-sqs))

src/cljs/auto_ap/views/components/layouts.cljs

@@ -87,7 +87,7 @@
              [:a {:class "navbar-item"
                   :on-click (fn []
                               (re-frame/dispatch [::events/swap-client nil]))
-                  } "All"]
+                  } "Allo" ]
              [:hr {:class "navbar-divider"}]
              (for [{:keys [name id] :as client} @clients]
                ^{:key id }
@@ -97,6 +97,7 @@
                     } name])]])]]
        [login-dropdown]]]))
 
+
 (defn footer []
   [:footer {:style {:padding "1em"}}
    [:div {:class "content has-text-centered"}