From a3d551c8bb281a5994d4615754e314e682085e7d Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Sat, 4 Dec 2010 11:53:11 +1100
Subject: [PATCH] The new xxx_sics users which SICS now runs as don't have
 permission to write the robot log files to /tmp

r3037 | ffr | 2010-12-04 11:53:11 +1100 (Sat, 04 Dec 2010) | 3 lines
---
 site_ansto/instrument/config/robots/sct_pickandplace.tcl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/site_ansto/instrument/config/robots/sct_pickandplace.tcl b/site_ansto/instrument/config/robots/sct_pickandplace.tcl
index 043bd0c7..3492ac63 100644
--- a/site_ansto/instrument/config/robots/sct_pickandplace.tcl
+++ b/site_ansto/instrument/config/robots/sct_pickandplace.tcl
@@ -8,7 +8,7 @@ namespace eval ::scobj::robot_pp {
 # /envcont/setpoint
 # /envcont/sensor/value
   proc debug_log {args} {
-    set fd [open "/tmp/robot_pp.log" a]
+    set fd [open "../log/robot_pp.log" a]
     puts $fd "[clock format [clock seconds] -format "%T"] $args"
     close $fd
   }
@@ -442,7 +442,7 @@ debug_log "Registering node $nodeName for write callback"
 # @param IP, the IP address of  the device, this can be a hostname, (eg ca1-kowari)
 # @param port, the IP protocol port number of the device
 proc add_robot {name IP port } {
-  set fd [open "/tmp/robot_pp.log" a]
+  set fd [open "../log/robot_pp.log" a]
   if {[SplitReply [environment_simulation]]=="false"} {
     puts $fd "makesctcontroller sct_robot_pp std ${IP}:$port"
     makesctcontroller sct_robot_pp std ${IP}:$port [binary format cc 0x0D 0x0A] 5.0
@@ -453,7 +453,7 @@ proc add_robot {name IP port } {
 }
 
 puts stdout "file evaluation of sct_pickandplace.tcl"
-set fd [open "/tmp/robot_pp.log" w]
+set fd [open "../log/robot_pp.log" w]
 puts $fd "file evaluation of sct_pickandplace.tcl"
 close $fd