diff --git a/README.org b/README.org
index 3a763ac..d8438c8 100644
--- a/README.org
+++ b/README.org
@@ -796,9 +796,9 @@ Stolen from [[https://git.sr.ht/~bzg/org-contrib/tree/master/item/lisp/ox-extra.
                          (header (org-export-read-attribute :header block :header)))
                      (when (and (string= type "LATEX") (string= header "yes"))
                        block))))))
-          ;; Set point to where to insert LaTeX header lines after
-          ;; deleting the block.
           (mapc (lambda (block)
+                  ;; Set point to where to insert LaTeX header lines
+                  ;; after deleting the block.
                   (goto-char (org-element-property :post-affiliated block))
                   (let ((lines
                          (split-string (org-element-property :value block) "\n")))
@@ -808,8 +808,9 @@ Stolen from [[https://git.sr.ht/~bzg/org-contrib/tree/master/item/lisp/ox-extra.
                       (insert (concat "#+latex_header: "
                                       (replace-regexp-in-string "\\` *" "" line)
                                       "\n")))))
-                ;; Reverse to go upwards to avoid wrecking the numeric
-                ;; positions earlier in the file.
+                ;; Reverse to go upwards to avoid wrecking the list of
+                ;; block positions in the file that would occur in case
+                ;; of going downwards.
                 (reverse blocks)))))
 
     (defun my-activate-buffer-local-org-export-filters ()