mumi: Remove "decode" procedure.
authorRicardo Wurmus <rekado@elephly.net>
Fri, 9 Nov 2018 21:23:16 +0000 (22:23 +0100)
committerRicardo Wurmus <rekado@elephly.net>
Fri, 9 Nov 2018 21:23:16 +0000 (22:23 +0100)
* mumi/messages.scm (decode): Remove procedure.

mumi/messages.scm

index 43d5d1b..7e88635 100644 (file)
@@ -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