aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--email/email.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/email/email.scm b/email/email.scm
index 16838d9..20bf291 100644
--- a/email/email.scm
+++ b/email/email.scm
@@ -1,5 +1,5 @@
;;; guile-email --- Guile email parser
-;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
;;;
;;; This file is part of guile-email.
;;;
@@ -768,7 +768,7 @@ message. Else, return a single <mime-entity> record."
(make-mime-entity headers (parse-email-body headers body)))))
(define (parse-email email)
- "Parse string EMAIL and return result as a <email> record."
+ "Parse string EMAIL and return result as an <email> record."
(let-values (((headers body) (email->headers+body email)))
(let ((headers-alist (parse-email-headers headers)))
(make-email headers-alist (parse-email-body headers-alist body)))))