regex-do 3.2.1 → 3.2.2

raw patch · 2 files changed

+23/−2 lines, 2 files

Files

regex-do.cabal +23/−1
src/Text/Regex/Do/Match/Regex.hs +0/−1

regex-do.cabal view

@@ -1,5 +1,5 @@ name:                regex-do-version:             3.2.1+version:             3.2.2 synopsis:            PCRE wrapper description:         format, search, replace (String | ByteString) with PCRE regex. Utf8-safe author:              Imants Cekusins@@ -95,6 +95,28 @@         TestRegex.TestReplaceOpen         TestRegex.TestReplaceUtf         TestRegex.TestMakeRegexM+        Text.Regex.Do.Match.Latin+        Text.Regex.Do.Match.Matchf+        Text.Regex.Do.Match.Option+        Text.Regex.Do.Match.Regex+        Text.Regex.Do.Match.Result+        Text.Regex.Do.Match.Utf8+        Text.Regex.Do.Pad+        Text.Regex.Do.Replace.Fast+        Text.Regex.Do.Replace.Latin+        Text.Regex.Do.Replace.Open+        Text.Regex.Do.Replace.Template+        Text.Regex.Do.Replace.Utf8+        Text.Regex.Do.Split+        Text.Regex.Do.Trim+        Text.Regex.Do.Type.Convert+        Text.Regex.Do.Type.Do+        Text.Regex.Do.Type.Do_+        Text.Regex.Do.Type.Extract+        Text.Regex.Do.Type.Internal+        Text.Regex.Do.Type.MatchHint+        Text.Regex.Do.Type.Reexport+    build-depends:  base <= 5.0,                   hspec,

src/Text/Regex/Do/Match/Regex.hs view

@@ -61,7 +61,6 @@ instance Monad RegexResult where     (>>=) (RegexResult (Left e1)) fn0 = RegexResult $ Left e1     (>>=) (RegexResult (Right a0)) fn0 = fn0 a0-    fail s0 = RegexResult $ Left [s0]  instance MonadFail RegexResult where     fail :: String -> RegexResult a