From c13d585d103ed0156386803b70dacb7b3b9a21b1 Mon Sep 17 00:00:00 2001
From: tv <tv@krebsco.de>
Date: Sun, 30 Apr 2017 13:51:14 +0200
Subject: Codec.MIME.Parse: replace tabs by spaces

---
 Codec/MIME/Parse.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/Codec/MIME/Parse.hs b/Codec/MIME/Parse.hs
index 221def0..c5392fe 100644
--- a/Codec/MIME/Parse.hs
+++ b/Codec/MIME/Parse.hs
@@ -139,12 +139,12 @@ parseMultipart mty body =
       ", has no required boundary parameter. Defaulting to text/plain") $
       (nullMIMEValue{ mime_val_type = defaultType
                     , mime_val_disp = Nothing
-		    , mime_val_content = Single body
-		    }, "")
+                    , mime_val_content = Single body
+                    }, "")
     Just bnd -> (nullMIMEValue { mime_val_type = mty
                                , mime_val_disp = Nothing
-			       , mime_val_content = Multi vals
-			       }, rs)
+                               , mime_val_content = Multi vals
+                               }, rs)
       where (vals,rs) = splitMulti bnd body
 
 splitMulti :: T.Text -> T.Text -> ([MIMEValue], T.Text)
-- 
cgit v1.2.3