From 7a17be14ce578c87780121663a8aa6e924b64188 Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Thu, 24 Oct 2013 12:43:41 +1100
Subject: [PATCH] SICS-673 PLC: eValue must be used to set values in the TCL
 interpreter.

---
 site_ansto/safetyplc.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/site_ansto/safetyplc.c b/site_ansto/safetyplc.c
index 03a18b07..d521e74f 100644
--- a/site_ansto/safetyplc.c
+++ b/site_ansto/safetyplc.c
@@ -349,7 +349,7 @@ static int PLC_Print(SConnection *pCon, SicsInterp *pSics,
     return 0;
   } else {
     snprintf(line, 132, "%s.%s = %s", name, param, plc_states[state]);
-    SCWrite(pCon, line, eStatus);
+    SCWrite(pCon, line, eValue);
     return OKOK;
   }
 }
@@ -361,7 +361,7 @@ static int PLC_Action(SConnection *pCon, SicsInterp *pSics,
   pSafetyPLCController self = (pSafetyPLCController) pData;
   if (argc == 1) {
     snprintf(line, 132, "%s.iValue = %06X", argv[0], self->iValue & 0xffffff);
-    SCWrite(pCon, line, eStatus);
+    SCWrite(pCon, line, eValue);
     return OKOK;
   }
   else if (argc == 2) {