projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
added echo cancelling
[spider.git]
/
perl
/
DXLogPrint.pm
diff --git
a/perl/DXLogPrint.pm
b/perl/DXLogPrint.pm
index 60f8b685bb8768e3e935629aca988c2b0bcd2d06..185912cda4948abefe7d3408da3d371651921417 100644
(file)
--- a/
perl/DXLogPrint.pm
+++ b/
perl/DXLogPrint.pm
@@
-37,9
+37,9
@@
sub print
my $count;
$search = '1' unless $pattern || $who;
my $count;
$search = '1' unless $pattern || $who;
- $search = "\$ref->[1] =~ /$pattern/" if $pattern;
+ $search = "\$ref->[1] =~ /$pattern/
i
" if $pattern;
$search .= ' && ' if $pattern && $who;
$search .= ' && ' if $pattern && $who;
- $search .= "(\$ref->[2] =~ /$who/
|| \$ref->[3] =~ /$who/
)" if $who;
+ $search .= "(\$ref->[2] =~ /$who/
i || \$ref->[3] =~ /$who/i
)" if $who;
$eval = qq(
my \$c;
my \$ref;
$eval = qq(
my \$c;
my \$ref;