diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2018-11-09 22:23:16 +0100 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2018-11-09 22:23:16 +0100 |
| commit | 25a94ed8350400de5148fdac40bc3b37edf9a3d2 (patch) | |
| tree | 51ef56847d54e3eff329fe8c8fc9830c49b17255 | |
| parent | 254fe5f4786e64ca770660b9ecf7a4d55a1be6e8 (diff) | |
mumi: Remove "decode" procedure.
* mumi/messages.scm (decode): Remove procedure.
| -rw-r--r-- | mumi/messages.scm | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/mumi/messages.scm b/mumi/messages.scm index 43d5d1b..7e88635 100644 --- a/mumi/messages.scm +++ b/mumi/messages.scm @@ -113,16 +113,6 @@ string." (newline) (loop (get-line decoder-port))))))))) -(define (decode headers str) - "Decode the string STR according to the encoding specified in -HEADERS." - (if (and=> (assoc-ref headers "content-transfer-encoding") - (lambda (values) - (string-contains (first values) "quoted-printable"))) - (with-input-from-string str - (lambda () (qp-decoder (current-input-port)))) - str)) - (define* (extract-attachment id msg-num path) "Extract attachment from message number MSG-NUM in the thread for the bug with the given ID. Follow PATH to get to the correct |