From 76863dea5c11fac8540b4043e731bacd29573ef9 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Fri, 29 May 2020 22:34:29 -0700
Subject: [PATCH] Factoids: strip quotes from pick() $var modifier

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

diff --git a/PBot/Factoids.pm b/PBot/Factoids.pm
index c0f4b3f1..796e7983 100644
--- a/PBot/Factoids.pm
+++ b/PBot/Factoids.pm
@@ -615,6 +615,8 @@ sub expand_factoid_vars {
                             splice @mylist, $index, 1;
                         }
 
+                        # strip outer quotes
+                        if (not $choice =~ s/^"(.*)"$/$1/) { $choice =~ s/^'(.*)'$/$1/; }
                         push @list, $choice;
                     }