Paul Klumpp 12 年之前
父節點
當前提交
b1a21991f6
共有 1 個文件被更改,包括 3 次插入1 次删除
  1. 3 1
      cims.tcl

+ 3 - 1
cims.tcl

@@ -771,6 +771,8 @@ proc ::cims::receive_answer {rec_botnick cmd rec_data} {
 	set rec_chancount [join [lindex $rec_data 4]]
 	set rec_userlist [join [lindex $rec_data 5]]
 
+	putlog "::cims:: * $rec_botnick gives the userlist: $rec_userlist "
+
 	# get this bots results to our namespaced variable:
 	# FIXME: make simple userstats more accurate by sending nicknames back..
 	# done: userstats should be counted in a correct variablename .. according to network and frequency
@@ -778,7 +780,7 @@ proc ::cims::receive_answer {rec_botnick cmd rec_data} {
 	#       $mnet_reached_chans($name,$chan) <- $mnet_reached_users($name,$chan)
 	set mnet_reached_users($name,$chan) [expr $mnet_reached_users($name,$chan) + $rec_usercount]
 	set mnet_reached_chans($name,$chan) [expr $mnet_reached_chans($name,$chan) + $rec_chancount]
-	set mnet_reached_userlist($name,$chan) [lsort -unique [lappend mnet_reached_userlist($name,$chan) [join $rec_userlist]]]
+	set mnet_reached_userlist($name,$chan) [lsort -unique [join [lappend mnet_reached_userlist($name,$chan) [join $rec_userlist]]]]
 	
   #hau
 	putlog "::cims:: * $rec_botnick told me he sent its message to $rec_usercount people in $rec_chancount channels for $network frequency $name!"