From 791c2e242702823c932c99960bce4f6675dff8c6 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Mon, 20 Nov 2017 22:47:24 +0100
Subject: debbugs: soap-email->email: Add docstring.

* debbugs/email.scm (soap-email->email): Add docstring.
---
 debbugs/email.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/debbugs/email.scm b/debbugs/email.scm
index 8666645..640b0a3 100644
--- a/debbugs/email.scm
+++ b/debbugs/email.scm
@@ -55,6 +55,8 @@
   (make-email (parse-headers header) body msg-num attachments))
 
 (define (soap-email->email email-item)
+  "Convert an SXML expression representing an email item from a SOAP
+response to an <email> object."
   (let ((email-properties (map soap->scheme (cdr email-item))))
     (apply email
            (append-map (match-lambda
-- 
cgit v1.2.3