From 37e6d0ed607f1c09409768ce609e0639f23b7eb4 Mon Sep 17 00:00:00 2001
From: ijackson <ijackson>
Date: Sat, 17 Feb 2001 19:34:48 +0000
Subject: [PATCH] Syntax bugfix in revised "set".

---
 bot.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bot.tcl b/bot.tcl
index b07b567..e5da846 100755
--- a/bot.tcl
+++ b/bot.tcl
@@ -1413,7 +1413,7 @@ proc marktime_desc {mt} {
 def_setting marktime {
     set mt [nickdb_get $n marktime]
     set p $mt
-    if {[string match $mt {[0-9]*}} { append p s }
+    if {[string match {[0-9]*} $mt]} { append p s }
     append p ": "
     append p [marktime_desc $mt]
     return $p
-- 
2.30.2