summaryrefslogtreecommitdiffstats
path: root/MIME/QuotedPrintable.hs
diff options
context:
space:
mode:
Diffstat (limited to 'MIME/QuotedPrintable.hs')
-rw-r--r--MIME/QuotedPrintable.hs12
1 files changed, 0 insertions, 12 deletions
diff --git a/MIME/QuotedPrintable.hs b/MIME/QuotedPrintable.hs
deleted file mode 100644
index 514ce4e..0000000
--- a/MIME/QuotedPrintable.hs
+++ /dev/null
@@ -1,12 +0,0 @@
-module MIME.QuotedPrintable where
-
-import Data.Char
-
-decode :: String -> String
-decode "" = ""
-decode ('=':x1:x2:xs)
- | isHexDigit x1 && isHexDigit x2 =
- chr (digitToInt x1 * 16 + digitToInt x2) : decode xs
-decode ('=':xs) = '=':decode xs
- -- make it explicit that we propagate other '=' occurrences.
-decode (x1:xs) = x1:decode xs