Allows making rules by client group

src/clj/auto_ap/server.clj

@@ -33,7 +33,6 @@
 
 (println "LOADING SERVER")
 
-
 (defn add-shutdown-hook! [^Runnable f]
   (.addShutdownHook (Runtime/getRuntime)
                     (Thread. f)))
@@ -157,7 +156,9 @@
           :else
           (do
             (add-shutdown-hook! shutdown-mount)
+            (println "HI?")
             (start-server :port 9000 :bind "0.0.0.0" #_#_:handler (cider-nrepl-handler))
-            (mount/start)
+            (println "HI 2?")
+            (mount/start (mount/except (mount/only #{#'user/jetty})))
             #_(alter-var-root #'nrepl.middleware.print/*print-fn* (constantly clojure.pprint/pprint))))))