diff --git a/Data/Array/Static.hs b/Data/Array/Static.hs
index 77acc75..d9fb126 100644
--- a/Data/Array/Static.hs
+++ b/Data/Array/Static.hs
@@ -12,4 +12,4 @@ bounds (StaticArray s e _) = (s,e)
 
 (!) :: (StaticElement e,Ix i) => StaticArray i e -> i -> e
 (!) (StaticArray s e addr) i = let (I# ri) = index (s,e) i
-                               in extract addr ri
\ No newline at end of file
+                               in extract addr ri
diff --git a/Data/Array/Static/Builder.hs b/Data/Array/Static/Builder.hs
index 478ce1d..8922009 100644
--- a/Data/Array/Static/Builder.hs
+++ b/Data/Array/Static/Builder.hs
@@ -9,4 +9,4 @@ buildStaticArray (s,e) els = "StaticArray ("++show s++") ("++show e++") \""
                              ++"\"#"
 
 buildStaticArray' :: (StaticElement e) => [e] -> String
-buildStaticArray' els = buildStaticArray (0,length els-1) els
\ No newline at end of file
+buildStaticArray' els = buildStaticArray (0,length els-1) els
diff --git a/Data/CharMap.hs b/Data/CharMap.hs
index 178ee60..3b2a095 100644
--- a/Data/CharMap.hs
+++ b/Data/CharMap.hs
@@ -70,4 +70,4 @@ mapMember c DeadEnd = False
 mapMember c (LeafMap1 mp) = member c mp
 mapMember c (LeafMap2 mp) = member c mp
 mapMember c (LeafMap4 mp) = member c mp
-mapMember c _ = True
\ No newline at end of file
+mapMember c _ = True
diff --git a/Data/CharMap/Builder.hs b/Data/CharMap/Builder.hs
index 68e6d03..c3a7a3f 100644
--- a/Data/CharMap/Builder.hs
+++ b/Data/CharMap/Builder.hs
@@ -61,4 +61,4 @@ buildCharMap lst = let slst = sortBy (comparing (fst.charRange)) lst
                                           in "Node ("++show el++") ("++build' l bl (pred el)++") ("++
                                              build' r el br++")"
                                                
-                   in build' grps minBound maxBound
\ No newline at end of file
+                   in build' grps minBound maxBound
diff --git a/Data/Encoding/ASCII.hs b/Data/Encoding/ASCII.hs
index e261df1..b07beda 100644
--- a/Data/Encoding/ASCII.hs
+++ b/Data/Encoding/ASCII.hs
@@ -18,4 +18,4 @@ instance Encoding ASCII where
     encodeChar enc c
       | encodeable enc c = pushWord8 . fromIntegral . ord $ c
       | otherwise        = throwException . HasNoRepresentation $ c
-    encodeable _ c = c < '\128'
\ No newline at end of file
+    encodeable _ c = c < '\128'
diff --git a/Data/Encoding/Base.hs b/Data/Encoding/Base.hs
index 2fea32a..6b7abef 100644
--- a/Data/Encoding/Base.hs
+++ b/Data/Encoding/Base.hs
@@ -98,4 +98,4 @@ decodeWithArray2 arr = do
              then throwException $ IllegalCharacter w1
              else return $ chr res
          )
-    else throwException $ IllegalCharacter w1
\ No newline at end of file
+    else throwException $ IllegalCharacter w1
diff --git a/Data/Encoding/BootString.hs b/Data/Encoding/BootString.hs
index ea6f5cf..8e86971 100644
--- a/Data/Encoding/BootString.hs
+++ b/Data/Encoding/BootString.hs
@@ -182,4 +182,4 @@ instance Encoding BootString where
                                 Nothing -> punyDecode base nbase
                                 Just ww -> throwException (IllegalCharacter ww)
 	Nothing -> punyDecode [] wrds
-    encodeable bs c = True -- XXX: hm, really?
\ No newline at end of file
+    encodeable bs c = True -- XXX: hm, really?
diff --git a/Data/Encoding/ByteSink.hs b/Data/Encoding/ByteSink.hs
index 3985e9c..6432489 100644
--- a/Data/Encoding/ByteSink.hs
+++ b/Data/Encoding/ByteSink.hs
@@ -189,4 +189,4 @@ instance ByteSink (ReaderT Handle IO) where
     pushWord8 x = do
       h <- ask
       liftIO $ do
-        hPutChar h (chr $ fromIntegral x)
\ No newline at end of file
+        hPutChar h (chr $ fromIntegral x)
diff --git a/Data/Encoding/ISO2022JP.hs b/Data/Encoding/ISO2022JP.hs
index 09b9f15..743d665 100644
--- a/Data/Encoding/ISO2022JP.hs
+++ b/Data/Encoding/ISO2022JP.hs
@@ -49,4 +49,4 @@ instance ISO2022 ISO2022JP where
         | encodeable ASCII c = Just (DynEncoding ASCII,[27,40,66])
         | encodeable JISX0201 c = Just (DynEncoding JISX0201,[27,40,74])
         | encodeable JISX0208 c = Just (DynEncoding JISX0208,[27,36,66])
-        | otherwise  = Nothing
\ No newline at end of file
+        | otherwise  = Nothing
diff --git a/Data/Encoding/ISO88591.hs b/Data/Encoding/ISO88591.hs
index fcb0a5f..bd96c82 100644
--- a/Data/Encoding/ISO88591.hs
+++ b/Data/Encoding/ISO88591.hs
@@ -20,4 +20,4 @@ instance Encoding ISO88591 where
     decodeChar _ = do
       w <- fetchWord8
       return (chr $ fromIntegral w)
-    encodeable _ c = c <= '\255'
\ No newline at end of file
+    encodeable _ c = c <= '\255'
diff --git a/Data/Encoding/KOI8R.hs b/Data/Encoding/KOI8R.hs
index f1ee2dc..9201591 100644
--- a/Data/Encoding/KOI8R.hs
+++ b/Data/Encoding/KOI8R.hs
@@ -57,4 +57,4 @@ instance Encoding KOI8R where
 	| otherwise   = case lookup ch koi8rMap of
 		Just w -> pushWord8 w
 		Nothing -> throwException (HasNoRepresentation ch)
-    encodeable _ c = member c koi8rMap
\ No newline at end of file
+    encodeable _ c = member c koi8rMap
diff --git a/Data/Encoding/KOI8U.hs b/Data/Encoding/KOI8U.hs
index 7a27f14..d80cebc 100644
--- a/Data/Encoding/KOI8U.hs
+++ b/Data/Encoding/KOI8U.hs
@@ -57,4 +57,4 @@ instance Encoding KOI8U where
 	| otherwise   = case lookup ch koi8uMap of
 		Just w  -> pushWord8 w
 		Nothing -> throwException (HasNoRepresentation ch)
-    encodeable _ c = member c koi8uMap
\ No newline at end of file
+    encodeable _ c = member c koi8uMap
diff --git a/Data/Encoding/Preprocessor/Mapping.hs b/Data/Encoding/Preprocessor/Mapping.hs
index 2207b76..dc372c7 100644
--- a/Data/Encoding/Preprocessor/Mapping.hs
+++ b/Data/Encoding/Preprocessor/Mapping.hs
@@ -157,4 +157,4 @@ preprocessMapping tp src trg mods name = do
                 ,"      Just c -> return c"
                 ,"  encodeChar _ c = mapEncode c "++mpname
                 ,"  encodeable _ c = mapMember c "++mpname
-                ]
\ No newline at end of file
+                ]
diff --git a/Data/Encoding/Preprocessor/XMLMappingBuilder.hs b/Data/Encoding/Preprocessor/XMLMappingBuilder.hs
index 03e3e9b..b8be3d3 100644
--- a/Data/Encoding/Preprocessor/XMLMappingBuilder.hs
+++ b/Data/Encoding/Preprocessor/XMLMappingBuilder.hs
@@ -313,4 +313,4 @@ buildGroups ((c,bs):rest) = (EncodingGroup c end (bs:wrds)):buildGroups oth
       group n all@((c,bs):rest)
           | succ n == c = let (e,res,oth) = group c rest
                           in (e,bs:res,oth)
-          | otherwise = (n,[],all)
\ No newline at end of file
+          | otherwise = (n,[],all)
diff --git a/Data/Encoding/UTF16.hs b/Data/Encoding/UTF16.hs
index baa94fd..d24b243 100644
--- a/Data/Encoding/UTF16.hs
+++ b/Data/Encoding/UTF16.hs
@@ -79,4 +79,4 @@ instance Encoding UTF16 where
                  return (c:cs)
         Right bom -> decode bom
     decode enc = untilM sourceEmpty (decodeChar enc)
-    encodeable _ c = (c > '\xDFFF' && c <= '\x10FFFF') || c < '\xD800'
\ No newline at end of file
+    encodeable _ c = (c > '\xDFFF' && c <= '\x10FFFF') || c < '\xD800'
diff --git a/Data/Encoding/UTF32.hs b/Data/Encoding/UTF32.hs
index 71e5d66..18f6210 100644
--- a/Data/Encoding/UTF32.hs
+++ b/Data/Encoding/UTF32.hs
@@ -44,4 +44,4 @@ instance Encoding UTF32 where
           rest <- untilM sourceEmpty (decodeChar UTF32)
           return ((chr $ fromIntegral ch):rest)
     decode enc = untilM sourceEmpty (decodeChar enc)
-    encodeable _ _ = True
\ No newline at end of file
+    encodeable _ _ = True
diff --git a/Data/Map/Static.hs b/Data/Map/Static.hs
index 25194f5..409ee90 100644
--- a/Data/Map/Static.hs
+++ b/Data/Map/Static.hs
@@ -25,4 +25,4 @@ member ind (StaticMap idx _) = lookup' 1
                   else case compare ind (idx!n) of
                          LT -> lookup' (n * 2)
                          GT -> lookup' ((n * 2) + 1)
-                         EQ -> True
\ No newline at end of file
+                         EQ -> True
diff --git a/Data/Static.hs b/Data/Static.hs
index 8b61ec4..effcb11 100644
--- a/Data/Static.hs
+++ b/Data/Static.hs
@@ -64,4 +64,4 @@ instance StaticElement a => StaticElement (a,a,a,a) where
                          x3 = extract addr (i *# 4# +# 2#)
                          x4 = extract addr (i *# 4# +# 3#)
                      in (x1,x2,x3,x4)
-    gen (x1,x2,x3,x4) = gen x1 ++ gen x2 ++ gen x3 ++ gen x4
\ No newline at end of file
+    gen (x1,x2,x3,x4) = gen x1 ++ gen x2 ++ gen x3 ++ gen x4
diff --git a/tests/Test/Tester.hs b/tests/Test/Tester.hs
index 53b46dc..cd4e18c 100644
--- a/tests/Test/Tester.hs
+++ b/tests/Test/Tester.hs
@@ -79,4 +79,4 @@ decodingIdentity e wrd
                         Right res' -> property (bstr==res')
     where
       bstr = BS.pack wrd
-      decoded = decodeStrictByteStringExplicit e bstr
\ No newline at end of file
+      decoded = decodeStrictByteStringExplicit e bstr
diff --git a/tests/Test/Tests.hs b/tests/Test/Tests.hs
index 335e1b3..1bf1207 100644
--- a/tests/Test/Tests.hs
+++ b/tests/Test/Tests.hs
@@ -282,4 +282,4 @@ gb18030Tests = TestList $ map test $
 
 {-big5Tests :: Test
 big5Tests = test (EncodingFileTest BIG5 "data/BIG5" "data/BIG5.UTF-8")-}
-            
\ No newline at end of file
+