1
0
Fork 0
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:
Ryan Voots 2017-01-28 00:01:44 -08:00
parent 3081e67e38
commit 024b3d5143

View file

@ -98,7 +98,7 @@ sub get_namespaced_factoid {
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);
($command, $body) = @+{qw/command body/};
}