From a0b3939b5b11447c2e16e27c024fcc1106c9d000 Mon Sep 17 00:00:00 2001
From: koennecke <koennecke>
Date: Fri, 20 Feb 2009 08:38:26 +0000
Subject: [PATCH] - Fixed supressed error messages

---
 exebuf.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/exebuf.c b/exebuf.c
index f695e831..dfe34d2e 100644
--- a/exebuf.c
+++ b/exebuf.c
@@ -237,9 +237,9 @@ int exeBufProcess(pExeBuf self, SicsInterp * pSics,
         SCWrite(pCon, GetCharArray(command), eError);
         SCWrite(pCon, "ERROR: end of Tcl error block", eLogError);
       } else {
-        /*
-           SICS error: has already been reported
-         */
+    	if(strstr(pTcl->result, "ERROR") != NULL){
+    		SCPrintf(pCon,eError,"%s occurred in %s", pTcl->result, cmd );
+    	}
         pCon->sicsError = 0;
       }
     }