first step of importability

src/cljs/auto_ap/views/pages/ledger/side_bar.cljs

@@ -6,7 +6,8 @@
             [re-frame.core :as re-frame]))
 
 (defn ledger-side-bar []
-  (let [ap @(re-frame/subscribe [::subs/active-page])]
+  (let [ap @(re-frame/subscribe [::subs/active-page])
+        user @(re-frame/subscribe [::subs/user])]
     [:div
      
      [:ul.menu-list
@@ -29,4 +30,9 @@
         [:span {:class "icon icon-accounting-abacus" :style {:font-size "25px"}}]
         
         [:span {:class "name"} "Balance Sheet"]]]
-      ]]))
+      (when (= "admin" (:user/role user))
+        [:li.menu-item
+         [:a.item {:href (bidi/path-for routes/routes :external-import-ledger)
+                   :class [(active-when ap = :external-import-ledger)]}
+          [:span.icon [:i {:class "fa fa-download"}]]
+          [:span {:class "name"} "External Import"]]])]]))