More reliability with company dropdown

src/clj/auto_ap/session_version.clj

@@ -1,10 +1,11 @@
 (ns auto-ap.session-version
-  (:require [bidi.bidi :as bidi]))
+  (:require [bidi.bidi :as bidi]
+            [auto-ap.logging :as alog]))
 
 ;; TODO this should only be done until SSR is complete
 ;; once it is, it should just use redirects based on headers
 ;; no header=use default, mismatch header=redirect to login
-(def current-session-version 1)
+(def current-session-version 2)
 (defn wrap-session-version
   [handler]
   (fn [request]
@@ -13,28 +14,9 @@
                                   (:uri request)
                                   :request-method (:request-method request))
           is-normal-route? (or (keyword? route)
-                               (keyword? (:handler route)))
-          whitelist #{:fastlink :oauth :login :health :raw-query :results-csv-query :results-json-query 
-                      :export-expected-deposits 
-                      :export-trial-balance 
-                      :export-sales 
-                      :export-transactions 
-                      :export-company-vendors 
-                      :export-payments 
-                      :export-ntg-sales-snapshot 
-                      :export-vendors 
-                      :export-transactions2 
-                      :aggregated-sales-export 
-                      :export-raw 
-                      :export-invoices 
-                      :export-clients 
-                      :export-accounts 
-                      :export-ntg-account-snapshot 
-                      :export-ledger}] ;; TODO SSR icky
-      (if (and (not= (:version session) current-session-version)
+                               (keyword? (:handler route)))] ;; TODO SSR icky
+      (if (and (not= (:version session current-session-version) current-session-version)
 
-               (not (whitelist route) )
-               (not (whitelist (:handler route)) )
                is-normal-route?)
         (cond
           (or (= :graphql (:handler route))