X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXLogPrint.pm;h=244402d6962493e685edb147cd734e83427284f3;hb=867c86a1f58144199f3a37a7b58ee8058452cbad;hp=0d99eb41804a740a9d0e95a18c13cabdf2a93b36;hpb=86d0e8cc034db0b0d23afc09b6f596c38a57885d;p=spider.git

diff --git a/perl/DXLogPrint.pm b/perl/DXLogPrint.pm
index 0d99eb41..244402d6 100644
--- a/perl/DXLogPrint.pm
+++ b/perl/DXLogPrint.pm
@@ -60,7 +60,7 @@ sub print
 	}
 	if ($who) {
 		$hint .= ' && ' if $hint;
-		$hint .= q{m{\Q$who\E}oi};
+		$hint .= q{m{\Q$who\E}i};
 	} 
 	$hint = "next unless $hint" if $hint;
 	$hint .= "; next unless m{^\\d+\\^$pattern\\^}" if $pattern;