old style cims

cims.tcl

@@ -598,11 +598,11 @@ proc ::cims::put_bot {botnetnick data} {
 	if {$testlink == 1} {
 		putlog "::cims:: put_bot: + a message delivered to $botnetnick."
 		
-		if {[string length $data] > 335} {
-			::putils::put_bot $botnetnick $data
-		} else {
+		#if {[string length $data] > 335} {
+		#	::putils::put_bot $botnetnick $data
+		#} else {
 			putbot $botnetnick $data
-		}
+		#}
 	} else {
 		putlog "::cims:: put_bot: + a message couldn't be delivered. Bot $botnetnick is not linked"
 	}

putils.tcl

@@ -228,7 +228,7 @@ proc ::putils::rec_bot {sender_botnetnick cmd rec_data} {
 		# decode base64data ... 
 		set original_data [::base64::decode $base64]
 		#putlog "original_data1: $original_data"
-		set original_data [split $original_data]
+		#set original_data [split $original_data]
 		putlog "original_data2: $original_data"
 
 		set md5 [::md5::md5 -hex $base64]