3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-27 06:19:25 +01:00

Whoops, don't add an $ to $0 expansion, use $0 in factoids and $$0 for factoid variables instead

This commit is contained in:
Pragmatic Software 2017-08-27 20:40:15 -07:00
parent a6e495352f
commit 25e104732e

View File

@ -379,7 +379,7 @@ sub expand_factoid_vars {
while (1) { while (1) {
last if ++$depth >= 10; last if ++$depth >= 10;
my $matches = 0; my $matches = 0;
$action =~ s/\$0/\$$root_keyword/g; $action =~ s/\$0/$root_keyword/g;
my $const_action = $action; my $const_action = $action;
while ($const_action =~ /(\ba\s*|\ban\s*)?(?<!\\)\$([a-zA-Z0-9_:\-#\[\]]+)/gi) { while ($const_action =~ /(\ba\s*|\ban\s*)?(?<!\\)\$([a-zA-Z0-9_:\-#\[\]]+)/gi) {
my ($a, $v) = ($1, $2); my ($a, $v) = ($1, $2);