Perlbot/perlbuut
1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 22:15:45 -04:00
Code Issues Releases Wiki Activity

foo bar

Browse source
This commit is contained in:
Ryan Voots 2010-04-05 14:40:26 -04:00
parent f9947c0c1b
commit f4a98d982e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
plugins/perldoc.pm
View file

@ -15,7 +15,7 @@ sub {
$query =~ s/%20/+/g;
$url = "http://perldoc.perl.org/search.html?q=".$query;
}
elsif ($said->{body} =~ /-f\s+(.*?)\s*/i) #functions, only use the first part of a multiword expression
elsif ($said->{body} =~ /-f\s+(.*)/i) #functions, only use the first part of a multiword expression
{
#http://perldoc.perl.org/functions/abs.html
my $func = $1;