From 39f53d2775f38514a537f03c7b72281ec31a3c0e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ra=C3=BAl=20Benencia?= <rul@kalgan.cc>
Date: Sun, 1 Sep 2013 11:16:38 -0300
Subject: Further improving on body scrolling

---
 Rfc1342.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Rfc1342.hs')

diff --git a/Rfc1342.hs b/Rfc1342.hs
index f4966fb..c2dad42 100644
--- a/Rfc1342.hs
+++ b/Rfc1342.hs
@@ -44,7 +44,7 @@ decodeWithCharset dec ('?':c:'?':cs) | toLower c == 'b' = dataDecodeWith B64.dec
         rest = if "?=" `isPrefixOf` rest'
                then drop 2 rest'
                else rest'
-        dataDecodeWith datadec = (_2spc . dec . unwrap . datadec $ encoded) ++ (decodeField $ dropWhile isSpace rest)
+        dataDecodeWith datadec = (_2spc . dec . unwrap . datadec $ encoded) ++ decodeField rest -- ++ (decodeField $ dropWhile isSpace rest)
 
 unwrap :: Maybe [Word8] -> String
 unwrap Nothing    = []
-- 
cgit v1.2.3