From 58a629eca419afdd4ed2594b3724dea13c9a22a4 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Sat, 2 Sep 2017 01:44:57 -0700
Subject: [PATCH] Correct 0-value factoid var expansion

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

diff --git a/PBot/Factoids.pm b/PBot/Factoids.pm
index bc63b6b9..5cb245c9 100644
--- a/PBot/Factoids.pm
+++ b/PBot/Factoids.pm
@@ -415,10 +415,10 @@ sub expand_factoid_vars {
 
       if ($self->{factoids}->hash->{$var_chan}->{$var}->{type} eq 'text') {
         my $change = $self->{factoids}->hash->{$var_chan}->{$var}->{action};
-        my @list = split(/\s+|(".*?")/, $change);
+        my @list = split(/\s|(".*?")/, $change);
         my @mylist;
         for (my $i = 0; $i <= $#list; $i++) {
-          push @mylist, $list[$i] if defined $list[$i];
+          push @mylist, $list[$i] if defined $list[$i] and length $list[$i];
         }
         my $line = int(rand($#mylist + 1));
         $mylist[$line] =~ s/"//g;