Make recompute! no-op for cljs, fixing assertion error on reload

nextjournal · Oct 7, 2024 · 857a30a · 857a30a
1 parent 955f3dc
commit 857a30a
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/src/nextjournal/clerk.clj b/src/nextjournal/clerk.clj
@@ -88,10 +88,11 @@
 (defn recompute!
  "Recomputes the currently visible doc, without parsing it."
  []
- (binding [*ns* (:ns @webserver/!doc)]
- (let [{:keys [result time-ms]} (eval/time-ms (eval/eval-analyzed-doc @webserver/!doc))]
- (println (str "Clerk recomputed '" @!last-file "' in " time-ms "ms."))
- (webserver/update-doc! result))))
+ (when-not (eval/cljs? @webserver/!doc)
+ (binding [*ns* (:ns @webserver/!doc)]
+ (let [{:keys [result time-ms]} (eval/time-ms (eval/eval-analyzed-doc @webserver/!doc))]
+ (println (str "Clerk recomputed '" @!last-file "' in " time-ms "ms."))
+ (webserver/update-doc! result)))))
 
 #_(recompute!)