diff --git a/sx/sx/home-stepper.sx b/sx/sx/home-stepper.sx index 8304a371..d684bbb6 100644 --- a/sx/sx/home-stepper.sx +++ b/sx/sx/home-stepper.sx @@ -221,14 +221,13 @@ (swap! step-idx inc) (update-code-highlight))))) (rebuild-preview (fn (target) - ;; Rebuild preview DOM directly from steps, without replaying do-step (let ((container (get-preview))) (when container (dom-set-prop container "innerHTML" "") (let ((expr (steps-to-preview (deref steps) target))) (when expr - (let ((rendered (render-to-dom expr (get-render-env nil) nil))) - (when rendered (dom-append container rendered))))) + (let ((dom (render-to-dom expr (get-render-env nil) nil))) + (when dom (dom-append container dom))))) (set-stack (list container)))))) (do-back (fn () (when (> (deref step-idx) 0)