diff --git a/index.sz b/index.sz
index 8914c7b..d46a875 100644
--- a/index.sz
+++ b/index.sz
@@ -57,8 +57,8 @@ This sums every line and every char read from stdin. When the port is closed, th
   (def line-seq (port->seq read-line (deref current-input-port)))
   (loop (:for line line-seq)
         (:acc lines (summing 1))
-        ;; Any :for after a non-:for clause opens a new subloop
-        ;; so this loops over ever char in the line.
+        ;; A :for after a non-:for clause opens a new level,
+        ;; so this loops over every char in the line.
         (:for ch line)
         (:acc chars (summing 1) :when (not (char-whitespace? ch)))
         => (show [(tabular [["Lines:" nl "Chars:" nl]
diff --git a/manual b/manual
index d35a116..1fe22a4 160000
--- a/manual
+++ b/manual
@@ -1 +1 @@
-Subproject commit d35a116b8a550b166f53e250f74c480ec49b1f77969883a7e6af87c24571d150
+Subproject commit 1fe22a4dfdf0b2084d3fb91986a6a98d3109756f43c36e9efba661832bedd14d