From 25e104732e00f6017af565aa7825a6ad7a5ac438 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Sun, 27 Aug 2017 20:40:15 -0700
Subject: [PATCH] Whoops, don't add an $ to $0 expansion, use $0 in factoids
 and $$0 for factoid variables instead

---
 PBot/Factoids.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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