summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2019-09-23 11:21:58 +0530
committerArun Isaac2019-09-23 11:21:58 +0530
commitc3735113113c7468f3797e81a52fff90507e0f9c (patch)
tree9d1f11d7147d7c62c86fa946a3d1b3db5b3a7c78
parentc10524726e0a91445a0329cc9aa72b7467258381 (diff)
downloadguile-email-c3735113113c7468f3797e81a52fff90507e0f9c.tar.gz
guile-email-c3735113113c7468f3797e81a52fff90507e0f9c.tar.lz
guile-email-c3735113113c7468f3797e81a52fff90507e0f9c.zip
email: Add read-next-email-in-mbox docstring.
* email/email.scm (read-next-email-in-mbox): Add docstring.
-rw-r--r--email/email.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/email/email.scm b/email/email.scm
index 6ed285f..d6b4e7e 100644
--- a/email/email.scm
+++ b/email/email.scm
@@ -902,6 +902,8 @@ list of header keys and values."
decoded-octets)))
(define (read-next-email-in-mbox port)
+ "Read next email from PORT and return as a bytevector. PORT is an
+input port reading an mbox file."
;; Read and discard From_ line
(get-line-with-delimiter port)
;; Read the actual email