From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 17 Feb 2001 19:34:48 +0000 (+0000)
Subject: Syntax bugfix in revised "set".
X-Git-Tag: branchpoint-2001-10-09-tell~24
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/ircbot/commitdiff_plain/a4e294d4949e90f68b12e5784b68d7d7fb52eea4

Syntax bugfix in revised "set".
---

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