mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 16:45:40 -04:00
Also fix the syntax for macros. funcs are broken but nobody fucking uses those, even me.
This commit is contained in:
parent
3081e67e38
commit
024b3d5143
1 changed files with 1 additions and 1 deletions
|
@ -98,7 +98,7 @@ sub get_namespaced_factoid {
|
||||||
|
|
||||||
return $body if $channel eq '*irc_msg' or $channel eq '##NULL';
|
return $body if $channel eq '*irc_msg' or $channel eq '##NULL';
|
||||||
|
|
||||||
if ($body =~ /^(?:\s*(?<command>$commands_re)\s+)?(?<body>.*)$/) {
|
if ($body =~ /^(?:\s*(?<command>$commands_re|macro)\s+)?(?<body>.*)$/) {
|
||||||
#my ($command, $body);
|
#my ($command, $body);
|
||||||
($command, $body) = @+{qw/command body/};
|
($command, $body) = @+{qw/command body/};
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Reference in a new issue