From 8898e74341eca5dacf3e64da8aba34517a76c9bf Mon Sep 17 00:00:00 2001 From: Elijah Perrault Date: Sat, 19 Feb 2011 16:56:41 -0700 Subject: [PATCH] Use case insensitivity. --- modules/QDB.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/modules/QDB.pm b/modules/QDB.pm index 8524fac..4d38c0c 100644 --- a/modules/QDB.pm +++ b/modules/QDB.pm @@ -129,7 +129,7 @@ sub cmd_qdb # Iterate through all quotes. foreach my $qkt (keys %$quotes) { # Check if we have a match. - if ($quotes->{$qkt}->{quote} =~ m/($expr)/xsm) { + if ($quotes->{$qkt}->{quote} =~ m/($expr)/ixsm) { # Match. Add to buffer. push @BUFFER, "\2ID:\2 $qkt - ".$quotes->{$qkt}->{quote}; }