소스 검색

cims logger

Paul Klumpp 12 년 전
부모
커밋
85a029d91a
1개의 변경된 파일3개의 추가작업 그리고 3개의 파일을 삭제
  1. 3 3
      cims_logger.tcl

+ 3 - 3
cims_logger.tcl

@@ -1,15 +1,15 @@
 # define your own logging.. lets called by mnet:history_queue! You can change the call in mnet.tcl
 # And you can change the things it does with the data here.. Logging is optional
 # and is most likely only done at a central netbot
-putlog "mnet: = Procedure mnet:history_logger loaded"
-proc mnet:history_logger {bucket nickname channel rec_text} {
+putlog "mnet: = Procedure ::cims::history_logger loaded"
+proc ::cims::history_logger {bucket nickname channel rec_text} {
 	
 	# write all to it
 	set timestamp [clock format [clock seconds] -format "%Y-%m-%d %H:%M:%S"]
 	set input_history "$timestamp / $nickname - $channel : $rec_text"
 	
 	#open handle
-	set fh [open "scripts/mnet/${bucket}.log" "a"]
+	set fh [open "scripts/cims/${bucket}.log" "a"]
 	# put to handle
 	puts $fh "$input_history"
 	# close handle