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

+ 2 - 1
putils.tcl

@@ -255,7 +255,8 @@ proc ::putils::rec_bot {sender_botnetnick cmd rec_data} {
 					#execute procedure
 					#$procedure $sender_botnetnick [join [lindex $original_data 0]] [list [lrange $original_data 1 end]]
 					putlog "::putils::rec_bot from $sender_botnetnick : execute procedure: $procedure $original_data"
-					$procedure $original_data
+					putlog "ORIGINAL DATA has [llength $original_data] ELEMENTS"
+					$procedure [split $original_data]
 				}
 			}
 		}