Edit: Okay. Here's the diff:
diff --git a/app.arc b/app.arc index 912a1ad..8106695 100644 --- a/app.arc +++ b/app.arc @@ -421,7 +421,7 @@ (do (pr "<p><pre><code>") (let cb (code-block s (- newi spaces 1)) (pr cb) - (= i (+ (- newi spaces 1) (len cb)))) + (= i (+ (- newi spaces 2) (len cb)))) (pr "</code></pre>")) (iflet newi (parabreak s i (if (is i 0) 1 0)) (do (unless (is i 0) (pr "<p>"))