Adds manager type, blocks certain permissions

src/clj/auto_ap/graphql.clj

@@ -824,9 +824,8 @@
 (defn get-user [context args value]
   (assert-admin (:id context))
 
-  (doto (let [users (d-users/get-graphql args)]
-          (->graphql users))
-    println))
+  (let [users (d-users/get-graphql args)]
+    (->graphql users)))
 
 (defn get-vendor [context args value]
   (->graphql