From e0e8434b85869ba117ac6011f894f8f3449112db Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Tue, 28 Nov 2017 18:30:35 -0800
Subject: [PATCH] Fix piping code-factoids

---
 PBot/Factoids.pm    | 1 -
 PBot/Interpreter.pm | 2 ++
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/PBot/Factoids.pm b/PBot/Factoids.pm
index 54cfc77c..ced0e0fa 100644
--- a/PBot/Factoids.pm
+++ b/PBot/Factoids.pm
@@ -733,7 +733,6 @@ sub interpreter {
   return undef if not length $stuff->{keyword} or $stuff->{interpret_depth} > $self->{pbot}->{registry}->get_value('interpreter', 'max_recursion');
 
   $stuff->{from} = lc $stuff->{from};
-  $self->{special} = "";
 
   # search for factoid against global channel and current channel (from unless ref_from is defined)
   my $original_keyword = $stuff->{keyword};
diff --git a/PBot/Interpreter.pm b/PBot/Interpreter.pm
index 5c5d0aa1..a9a60ddc 100644
--- a/PBot/Interpreter.pm
+++ b/PBot/Interpreter.pm
@@ -209,6 +209,8 @@ sub interpret {
 
   $pbot->{logger}->log("=== Enter interpret_command: [" . (defined $stuff->{from} ? $stuff->{from} : "(undef)") . "][$stuff->{nick}!$stuff->{user}\@$stuff->{host}][$stuff->{interpret_depth}][$stuff->{command}]\n");
 
+  $stuff->{special} = "";
+
   if ($self->{pbot}->{registry}->get_value('general', 'debugcontext')) {
     use Data::Dumper;
     $Data::Dumper::Sortkeys  = 1;