From 110f019bf218f27e07eedad19100eacc52581d40 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Fri, 24 Feb 2023 20:50:19 -0800
Subject: [PATCH] MessageHistory: `recall`: fix incorrect whitespace appended
 to text argument if `-t` is not used

---
 lib/PBot/Core/Commands/MessageHistory.pm | 8 +++++---
 lib/PBot/VERSION.pm                      | 4 ++--
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/lib/PBot/Core/Commands/MessageHistory.pm b/lib/PBot/Core/Commands/MessageHistory.pm
index 2ddfe5ab..65850cfb 100644
--- a/lib/PBot/Core/Commands/MessageHistory.pm
+++ b/lib/PBot/Core/Commands/MessageHistory.pm
@@ -266,10 +266,12 @@ sub cmd_recall_message {
         if (not $channel_arg) {
             $recall_channel = "@$opt_args" if @$opt_args;
         } else {
-            if (defined $recall_history) {
-                $recall_history .= ' ';
+            if (@$opt_args) {
+                if (defined $recall_history) {
+                    $recall_history .= ' ';
+                }
+                $recall_history .= "@$opt_args";
             }
-            $recall_history .= "@$opt_args" if @$opt_args;
         }
 
         if (defined $recall_text and not defined $recall_history) {
diff --git a/lib/PBot/VERSION.pm b/lib/PBot/VERSION.pm
index ea40f276..f5c779ba 100644
--- a/lib/PBot/VERSION.pm
+++ b/lib/PBot/VERSION.pm
@@ -25,8 +25,8 @@ use PBot::Imports;
 # These are set by the /misc/update_version script
 use constant {
     BUILD_NAME     => "PBot",
-    BUILD_REVISION => 4623,
-    BUILD_DATE     => "2023-02-23",
+    BUILD_REVISION => 4624,
+    BUILD_DATE     => "2023-02-24",
 };
 
 sub initialize {}