broaden whitelist
This commit is contained in:
@@ -13,12 +13,28 @@
|
||||
(:uri request)
|
||||
:request-method (:request-method request))
|
||||
is-normal-route? (or (keyword? route)
|
||||
(keyword? (:handler route)))] ;; TODO SSR icky
|
||||
(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)
|
||||
(not= :login route)
|
||||
(not= :oauth route)
|
||||
(not= :oauth (:handler route))
|
||||
(not= :login (:handler route))
|
||||
|
||||
(not (whitelist route) )
|
||||
(not (whitelist (:handler route)) )
|
||||
is-normal-route?)
|
||||
(cond
|
||||
(or (= :graphql (:handler route))
|
||||
|
||||
Reference in New Issue
Block a user