bot.tcl: Trim md5sum(1)'s annoying decoration from its output.
authorMark Wooding <mdw@distorted.org.uk>
Sat, 1 Sep 2012 17:14:51 +0000 (18:14 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Sat, 1 Sep 2012 17:18:15 +0000 (18:18 +0100)
bot.tcl

diff --git a/bot.tcl b/bot.tcl
index d89e18e..dabbf26 100755 (executable)
--- a/bot.tcl
+++ b/bot.tcl
@@ -1934,7 +1934,7 @@ def_ucmd summon {
     }
 }
 
-proc md5sum {value} { exec md5sum << $value }
+proc md5sum {value} { lindex [exec md5sum << $value] 0 }
 
 def_ucmd seen {
     global lastseen nick