From a17eec1f3710a2ac7257004cd0ec2064397209bb Mon Sep 17 00:00:00 2001
From: Sean Corfield <sean@corfield.org>
Date: Tue, 17 Aug 2021 22:25:20 -0700
Subject: [PATCH] Update .gitpod

---
 .clover/config.cljs | 18 ++----------------
 .gitpod.yml         |  8 ++++++--
 2 files changed, 8 insertions(+), 18 deletions(-)

diff --git a/.clover/config.cljs b/.clover/config.cljs
index 88bde0b..8fbf26e 100644
--- a/.clover/config.cljs
+++ b/.clover/config.cljs
@@ -1,21 +1,7 @@
 ;; ~/.config/clover/config.cljs
+;; for running in GitPod, we don't tap> values:
 
-;; if you want to support Cognitect's REBL, use this version:
-
-#_(defn- wrap-in-tap [code]
-    (str "(let [value (try " code " (catch Throwable t t))"
-         "      rr    (try (resolve 'requiring-resolve) (catch Throwable _))]"
-         "  (if-let [rs (try (rr 'cognitect.rebl/submit) (catch Throwable _))]"
-         "    (rs '" code " value)"
-         "    (tap> value))"
-         "  value)"))
-
-;; if you only care about submitting values via tap> (e.g., Reveal, Portal):
-
-(defn- wrap-in-tap [code]
-  (str "(let [value (try " code " (catch Throwable t t))]"
-       "  (tap> value)"
-       "  value)"))
+(defn- wrap-in-tap [code] code)
 
 (defn tap-top-block []
   (p/let [block (editor/get-top-block)]
diff --git a/.gitpod.yml b/.gitpod.yml
index 733a042..fa086ff 100644
--- a/.gitpod.yml
+++ b/.gitpod.yml
@@ -4,12 +4,16 @@ image:
 vscode:
   extensions:
     - betterthantomorrow.calva
+    - mauricioszabo.clover
 
 tasks:
   - name: Prepare deps
     init: -A:test -P
   - name: Clover Config
-    command: cp .clover/config.cljs ~/.config/clover/
+    command: |
+      echo 50505 > .socket-repl-port
+      mkdir ~/.config/clover
+      cp .clover/config.cljs ~/.config/clover/
   - name: Start REPL
     command: clojure -J-Dclojure.server.repl="{:address \"0.0.0.0\" :port 50505 :accept clojure.core.server/repl}" -A:test
   - name: Start up
@@ -17,4 +21,4 @@ tasks:
 
 github:
   prebuilds:
-    main: true
\ No newline at end of file
+    main: true