fix rewrite

nextjournal · Jul 11, 2023 · 736afbf · 736afbf
1 parent 62ae416
commit 736afbf
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/notebooks/squint_wip.clj b/notebooks/squint_wip.clj
@@ -45,7 +45,7 @@
                                   (let [fib (fn fib [x]
                                               (= 1 2)
                                               (if (= x 10)
-                                                :hello
+                                                :dude
                                                 (fib (dec x))))]
                                     (fib 20)))}
   {::clerk/render-evaluator :squint} 25)

diff --git a/src/nextjournal/clerk/viewer.cljc b/src/nextjournal/clerk/viewer.cljc
@@ -1791,7 +1791,7 @@
   * dropping the `(binding [*ns* *ns*] ,,,)`
   * rewriting `load-string`"
   [form]
-  form #_(let [form-without-binding (last form)]
+  (let [form-without-binding (last form)]
     (if (and (seq? form-without-binding) (= 'load-string (first form-without-binding)))
       (list 'js/global_eval (list 'nextjournal.clerk.cherry-env/cherry-compile-string (second form-without-binding)))
       form-without-binding)))