From befea6c341289c072692ceb50ca16de3271cd43b Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 19 Aug 2003 16:34:11 +0000
Subject: [PATCH] [project @ 2003-08-19 16:34:11 by simonmar] Fix reversed
 flag in mkRegexWithOpts

---
 Text/Regex.hs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Text/Regex.hs b/Text/Regex.hs
index a0d724e..a0af8cd 100644
--- a/Text/Regex.hs
+++ b/Text/Regex.hs
@@ -47,8 +47,8 @@ mkRegexWithOpts
 mkRegexWithOpts s single_line case_sensitive
    = unsafePerformIO (RE.regcomp s (RE.regExtended + newline + igcase))
    where
-	newline | single_line = 0
-		| otherwise   = RE.regNewline
+	newline | single_line = RE.regNewline
+		| otherwise   = 0
 
 	igcase  | case_sensitive = 0 
 		| otherwise 	 = RE.regIgnoreCase
-- 
1.7.10.4