|
@@ -994,7 +994,7 @@ proc ::cims::reply_timeout {name chan} {
|
|
|
set userlist $mnet_reached_userlist($name,$chan)
|
|
|
set chans $mnet_reached_chans($name,$chan)
|
|
|
|
|
|
- set user_cnt [llength [join $userlist]]
|
|
|
+ set user_cnt [llength $userlist]
|
|
|
|
|
|
putlog "::cims:: userlist: $userlist"
|
|
|
|
|
@@ -1002,7 +1002,8 @@ proc ::cims::reply_timeout {name chan} {
|
|
|
# inzwischen drfte auch die antwort gekommen sein.. also jetzt mnet_reached_* auswerten nach timeout..
|
|
|
|
|
|
# make stats channel-dependent
|
|
|
- putlog "::cims:: * After ALL: Count_Users: $mnet_reached_users($name,$chan) Count_Channels: $mnet_reached_chans($name,$chan)"
|
|
|
+ putlog "::cims:: * userlist is finally: $userlist "
|
|
|
+ putlog "::cims:: * After ALL: Count_Users: $user_cnt Count_Channels: $mnet_reached_chans($name,$chan)"
|
|
|
|
|
|
# Give me some reply.
|
|
|
::putils::put_local_msg ${chan} "::cims:: Message sent to $chans channels, reaching $user_cnt unique users."
|