From 111033679998d05a85a8ed8cc882ae04702d20ac Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 4 Aug 2005 11:40:26 +0000
Subject: [PATCH] [project @ 2005-08-04 11:40:26 by simonmar] fix typo in
 subRegex (fixes subRegex breakage on Windows)

---
 Text/Regex.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Text/Regex.hs b/Text/Regex.hs
index 7a24043..152616a 100644
--- a/Text/Regex.hs
+++ b/Text/Regex.hs
@@ -94,7 +94,7 @@ subRegex :: Regex                          -- ^ Search pattern
       -> String                         -- ^ Output string
 subRegex _ "" _ = ""
 subRegex regexp inp repl =
-    let bre = mkRegex "\\\\(\\\\||[0-9]+)"
+    let bre = mkRegex "\\\\(\\\\|[0-9]+)"
         lookup _ [] _ = []
         lookup [] _ _ = []
         lookup match repl groups =
-- 
1.7.10.4