X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Quotes.pm;h=97aa231603379b1d59a091ce575aae370b74b733;hb=1ed82d8a9a0e41dc198dc52efc5eb591c4d03651;hp=bebc9bbcb0f3509bb765e6c7b51eb34a10454e0b;hpb=ca08e0e929a1e51db68f756c2ad637f6b4b610b3;p=NDIRC.git diff --git a/Quotes.pm b/Quotes.pm index bebc9bb..97aa231 100644 --- a/Quotes.pm +++ b/Quotes.pm @@ -68,6 +68,10 @@ sub lastQuote { sub findQuote { my ($pattern,$type) = @_; my $matcher; + unless (defined $pattern){ + $ND::server->command("notice $ND::nick $type query | findqre uses regexes as query, findquote a substring match. Both are case insensitive"); + return; + } if ($type eq 'findqre'){ if (defined (eval 'm/$pattern/ix')){ $matcher = 'm/$pattern/ix';