From 8268c96427ff7fd218eb20cf739b394fe58dd5f9 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 25 Jun 2019 13:35:44 +0530
Subject: email: Fix typo in docstring of parse-mime-entity.
* email/email.scm (parse-mime-entity): Replace "a" with "an" in
docstring.
---
email/email.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
(limited to 'email')
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)))))
--
cgit 1.4.1