From 009a87ffad8d3ea804dba65aedef7fddec7aa6d2 Mon Sep 17 00:00:00 2001
From: lookshe <lookshe@fumuga.com>
Date: Sun, 9 Sep 2012 21:02:03 +0200
Subject: don't know what changed, but there's something ;-)

---
 decision.tcl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'decision.tcl')

diff --git a/decision.tcl b/decision.tcl
index f0eb41c..8cf6967 100644
--- a/decision.tcl
+++ b/decision.tcl
@@ -72,6 +72,9 @@ if {[info exists do_dec($nick:$chan)]} {
 }
 
    set allargs [string map {" " _} $arguments]
+   set allargs [string map {"\[" _} $allargs]
+   set allargs [string map {"]" _} $allargs]
+#putlog "all: $allargs"
    set arguments [split $arguments]
    set count 1
    set klammer_count 0
@@ -97,7 +100,7 @@ if {[info exists do_dec($nick:$chan)]} {
    set myrand [rand $klammer_count]
    if {[info exists do_dec($allargs)]} {
       set myrand $do_dec($allargs)
-      timer 60 "unset do_dec($allargs)"
+      #timer 1 "unset do_dec($allargs)"
    } else {
       set do_dec($allargs) $myrand
       timer 60 "unset do_dec($allargs)"
-- 
cgit v1.2.3