Fixes logout link.

src/clj/auto_ap/ssr/ui.clj

@@ -12,6 +12,39 @@
               (hiccup/html
                    {}
                    hiccup))})
+(defn client-dropdown []
+  (let [client           nil
+        matching-clients nil]
+    
+    [:div#company-dropdown.navbar-item.has-dropdown
+     [:a.navbar-link {"_" (hiccup/raw "on click toggle .is-active on <#company-dropdown />")} "Company"]
+     [:div.navbar-dropdown
+      [:input.input.navbar-item {:placeholder "Company name"
+                                 :autoFocus true} ]
+
+      ]]
+    #_[navbar-drop-down {:header (str "Company: " (if @client (:name @client)
+                                                    "All"))
+                       :id     :select-client}
+     [:div
+      [:a {:class    "navbar-item"
+           :on-click (fn []
+                       (re-frame/dispatch [:events/toggle-menu :select-client])
+                       (re-frame/dispatch [:forms/form-closing :client-search])
+                       (re-frame/dispatch [:events/swap-client nil]))} "All" ]
+      [:hr {:class "navbar-divider"}]
+      [form-builder/builder {:id           :client-search
+                             :submit-event [:client-searched]}
+       [form-builder/raw-field-v2  {:field :value}
+        [:input.input.navbar-item {:placeholder "Company name"
+                                   :auto-focus  true}]]]
+      (for [{:keys [name id] :as client} (take 8 matching-clients)]
+        ^{:key id }
+        [:a {:class    "navbar-item"
+             :on-click (fn []
+                         (re-frame/dispatch [:events/toggle-menu :select-client])
+                         (re-frame/dispatch [:events/swap-client client]))
+             } name])]]))
 
 (defn base-page [contents side-bar-contents]
   (html-page 
@@ -59,9 +92,9 @@
              "POS" ]
             [:a.navbar-item {:href "/transactions/"}
              "Transactions" ]
-            
             [:a.navbar-item {:href "/ledger/"}
-             "Ledger" ]]]]]
+             "Ledger" ]
+            (client-dropdown)]]]]
         [:div {:class "columns has-shadow", :id "mail-app", :style "margin-bottom: 0px; height: calc(100vh - 46px);"}
          [:aside {:class "column aside menu is-2 "}
           [:div {:class "main left-nav"}