remove debugging printlns and time calls

Author: plexus

src/lambdaisland/launchpad/deps.clj

@@ -30,7 +30,7 @@
   (spit ".cpcache/launchpad.cp"
         (str/join
          ":"
-         (time (mapcat second (licp/classpath-chain))))))
+         (mapcat second (licp/classpath-chain)))))
 
 (defn watch-handlers [opts]
   (let [basis (basis opts)

src/lambdaisland/launchpad/watcher.clj

@@ -63,17 +63,14 @@
                (run! beholder/stop w))
              (doall
               (for [dir directories]
-                (do
-                  (print dir "")
-                  (time
-                   (watch
-                    (fn [{:keys [type path] :as event}]
-                      (if-let [f (get file->handler (str path))]
-                        (try
-                          (f event)
-                          (catch Exception e
-                            (prn e)))))
-                    (str dir))))))))))
+                (watch
+                 (fn [{:keys [type path] :as event}]
+                   (if-let [f (get file->handler (str path))]
+                     (try
+                       (f event)
+                       (catch Exception e
+                         (prn e)))))
+                 (str dir))))))))
 
 (comment
   (watch!