Changeset 271

Timestamp:

09/17/03 11:59:38 (8 years ago)

Author:

jamesoff

Message:

oops typo

File:

• trunk/modules/system.tcl (modified) (3 diffs)

trunk/modules/system.tcl

@@ -165 +165 @@
   foreach channel $bMotionInfo(randomChannels) {
     if {[lsearch $bMotionSettings(noAwayFor) $channel] == -1} {
+
       bMotionDoAction $channel $awayReason "/is away: %%"
     }
@@ -183 +184 @@
   foreach channel $bMotionInfo(randomChannels) {
     if {[lsearch $bMotionSettings(noAwayFor) $channel] == -1} {
+
       bMotionDoAction $channel "" "/is back"
     }
@@ -585 +587 @@
 
 proc bMotion_get_number { num } {
+  return [expr [rand $num] + 1]
   set hundred ""
   set ten ""