From 7667da94a555deb4a74e561d44ea6673f8f27786 Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Tue, 26 May 2020 19:25:26 +0000
Subject: [PATCH] For Nelgin: ";!" will repeat the last (non-blank) ";string"
 command.

---
 exec/default.src | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/exec/default.src b/exec/default.src
index 6560874068..bdeb559cc5 100644
--- a/exec/default.src
+++ b/exec/default.src
@@ -27,6 +27,8 @@
 
 !include sbbsdefs.inc
 
+str last_str_cmd
+
 # Set return point for main menu commands (via end_cmd)
 cmd_home
 
@@ -166,7 +168,15 @@ cmdkey ;
 	else
 		getstr 40
 		end_if
+    compare_str !
+    if_equal
+        copy str last_str_cmd
+        end_if
 	exec_bin "str_cmds %s"
+    compare_str ""
+    if_not_equal
+        copy last_str_cmd str
+        end_if
 	end_cmd
 
 cmdkey T
@@ -645,7 +655,15 @@ cmdkey ;
 	else
         getstr 40
 		end_if
+    compare_str !
+    if_equal
+        copy str last_str_cmd
+        end_if
 	exec_bin "str_cmds %s"
+    compare_str ""
+    if_not_equal
+        copy last_str_cmd str
+        end_if
 	end_cmd
 
 cmdkey Q
-- 
GitLab