SICS-754 Use "clientput" instead of "puts stdout" in non-generated drivers

2014-06-26 14:08:20 +10:00
parent fe3489b61f
commit 8bf1764dd9
15 changed files with 21 additions and 21 deletions
--- a/site_ansto/instrument/config/environment/temperature/sct_watlow_st4.tcl
+++ b/site_ansto/instrument/config/environment/temperature/sct_watlow_st4.tcl
@@ -776,7 +776,7 @@ proc add_watlow_st {name IP port dev_id {_tol 5.0} {CID 1} {CTYPE T}} {
  close $fd
 }

-puts stdout "file evaluation of sct_watlow_st4.tcl"
+clientput "file evaluation of sct_watlow_st4.tcl"
 set fd [open "../log/watlow_st.log" w]
 puts $fd "file evaluation of sct_watlow_st4.tcl"
 close $fd
@@ -799,7 +799,7 @@ if {[ catch {
    }
  }
 } message ]} {
-  puts "ERROR: $message"
+  clientput "ERROR: $message"
 }

 namespace import ::scobj::watlow_st::*