summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--email/email.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/email/email.scm b/email/email.scm
index aab6a21..7e613ff 100644
--- a/email/email.scm
+++ b/email/email.scm
@@ -747,7 +747,7 @@ message. Else, return a single <mime-entity> record."
     (let ((headers
            (pre-post-order
             (peg:tree
-             (match-pattern mime-entity-fields text))
+             (match-pattern mime-entity-fields headers))
             `((content . ,post-process-content-type)
               (encoding . ,post-process-content-transfer-encoding)
               (disposition . ,post-process-content-disposition)