SICS-705 Fix mercury log file creation bug.
This commit is contained in:
committed by
Ferdi Franceschini
parent
99955b01da
commit
7b814089ff
@@ -860,7 +860,7 @@ if {0} {
|
|||||||
|
|
||||||
proc add_[set vendor]_[set device] {the_name IP port {_tol 5.0}} {
|
proc add_[set vendor]_[set device] {the_name IP port {_tol 5.0}} {
|
||||||
set [ns]::log_file "/tmp/[set [ns]::ven_dev]_[set the_name].log"
|
set [ns]::log_file "/tmp/[set [ns]::ven_dev]_[set the_name].log"
|
||||||
set fd [open [ns]::log_file "w"]
|
set fd [set [open [ns]::log_file "w"]]
|
||||||
close $fd
|
close $fd
|
||||||
debug_log 1 "add_[set [ns]::vendor]_[set [ns]::device] ${the_name} ${IP} ${port} ${_tol}"
|
debug_log 1 "add_[set [ns]::vendor]_[set [ns]::device] ${the_name} ${IP} ${port} ${_tol}"
|
||||||
puts "Namespace: [namespace current]"
|
puts "Namespace: [namespace current]"
|
||||||
|
|||||||
Reference in New Issue
Block a user