diff options
author | lookshe <mail@lookshe.org> | 2012-02-06 12:35:29 +0100 |
---|---|---|
committer | lookshe <mail@lookshe.org> | 2012-02-06 12:35:29 +0100 |
commit | 3ca035eb933a6623cc2bd64758bb411d034130e1 (patch) | |
tree | 4718da83fcf772a2840956bf15b9cb5d83496702 | |
parent | ed521c96a03dad1f860bcc818482eed0ffadb378 (diff) |
Fix for numbers less then zero in !zufall
-rw-r--r-- | decision.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/decision.tcl b/decision.tcl index 92fbdb2..f0eb41c 100644 --- a/decision.tcl +++ b/decision.tcl @@ -41,7 +41,7 @@ proc proc_zufall {nick host hand chan arguments} { } set arg $arguments set myran 0 - if {$arg == 0} { + if {$arg <= 0} { set arg 6 } set myran [expr [rand $arg] + 1] |