strptime 1.0.4 → 1.0.5

raw patch · 2 files changed

+3/−3 lines, 2 files

Files

• Data/Time/Parse.hsc +2/−2
• strptime.cabal +1/−1

@@ -66,10 +66,10 @@     strptime_ :: a -> a -> Maybe (LocalTime, Int)  instance Strptime_ [Char] where-    strptime_ f s = strptime_ (S.pack f) (S.pack s)+    strptime_ f = let pf = S.pack f in \s -> strptime_ pf (S.pack s)  instance Strptime_ L.ByteString where-    strptime_ f s = strptime_ (S.concat . L.toChunks $ f) (S.concat . L.toChunks $ s)+    strptime_ f = let pf = S.concat (L.toChunks f) in \s -> strptime_ pf (S.concat . L.toChunks $ s)  instance Strptime_ S.ByteString where     strptime_ f = U.unsafePerformIO $ do

@@ -1,6 +1,6 @@ Name: strptime Category: System, Data, Parsing-Version: 1.0.4+Version: 1.0.5 Cabal-version: >= 1.2 Build-type: Simple Copyright: Eugene Kirpichov