fixing several issues.

2019-01-18 08:10:54 -08:00
parent 775150131e
commit 72350a03c1
8 changed files with 10 additions and 7 deletions
--- a/src/clj/auto_ap/graphql/utils.clj
+++ b/src/clj/auto_ap/graphql/utils.clj
@@ -48,6 +48,8 @@
    (throw-unauthorized)))

 (defn can-see-client? [identity client]
+  (when (not client)
+    (println "WARNING - permission checking for null client"))
  (or (= "admin" (:user/role identity))
      ((set (map :db/id (:user/clients identity))) (:db/id client))
      ((set (map :db/id (:user/clients identity))) client)))