basic permissions

2019-01-11 00:10:37 -08:00
parent 7151adbfdf
commit 24b82802a8
5 changed files with 25 additions and 7 deletions
--- a/src/clj/auto_ap/graphql.clj
+++ b/src/clj/auto_ap/graphql.clj
@@ -416,6 +416,7 @@


 (defn get-company [context args value]
+  (println "user " (:id context))
  (->graphql
   (filter #(can-see-company? (:id context) %)
           (d-clients/get-all))))