try

cims.tcl

@@ -712,7 +712,7 @@ proc ::cims::receive_message {rec_botnick cmd rec_data} {
 	#putlog "rec_nickname: '$rec_nickname'"
 
 	set rec_channel  [join [lindex $rec_data 3]]
-	putlog "that ONE LALAL chan: $rec_channel"
+	
 
 	#set rec_text [::cims::clean_txt [join [lrange [split $rec_data] 4 end]]]
 
@@ -789,6 +789,8 @@ proc ::cims::receive_message {rec_botnick cmd rec_data} {
   #}
 
   # ANSWER! SEND THE REPLY of counts to the originating bot.
+	putlog "that ONE LALAL chan: $rec_channel"
+
 	::cims::put_bot $rec_botnick "mnet_answer $network $name [list $rec_channel] $users $count_channels $unique_userlist"
 	return 0
 }
@@ -805,7 +807,7 @@ proc ::cims::receive_answer {rec_botnick cmd rec_data} {
 	putlog "::cims:: * on receive_answer from $rec_botnick length: $long"
 
 	# we receive a STRING in rec_data! convert into list!
-	set rec_data [split $rec_data]
+	#set rec_data [split $rec_data]
 
 	# work with list (lindex, lrange) and put together to a STRING again with JOIN.
 	set network [join [lindex $rec_data 0]]