From da1ea8b2db9a9dac73ee02f114e07e368abb69e9 Mon Sep 17 00:00:00 2001
From: fdbozzo <fdbozzo@.(none)>
Date: Thu, 29 May 2014 01:16:00 +0200
Subject: [PATCH] Changeset: 262 fdbozzo - 29/05/2014 00:57:01:

---
 TESTS/fxu_lib_objetos_y_funciones_de_soporte.prg | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/TESTS/fxu_lib_objetos_y_funciones_de_soporte.prg b/TESTS/fxu_lib_objetos_y_funciones_de_soporte.prg
index bdf5490..1fc2256 100644
--- a/TESTS/fxu_lib_objetos_y_funciones_de_soporte.prg
+++ b/TESTS/fxu_lib_objetos_y_funciones_de_soporte.prg
@@ -122,7 +122,14 @@ DEFINE CLASS CL_FXU_CONFIG AS CUSTOM
 	PROCEDURE copiarArchivosParaTest
 		LPARAMETERS tcFileSpec
 
-		COPY FILE (FORCEPATH( tcFileSpec, THIS.cPathDatosReadOnly )) TO (FORCEPATH( tcFileSpec, THIS.cPathDatosTest ))
+		TRY
+			LOCAL loEx as Exception
+			COPY FILE (FORCEPATH( tcFileSpec, THIS.cPathDatosReadOnly )) TO (FORCEPATH( tcFileSpec, THIS.cPathDatosTest ))
+
+		CATCH TO loEx
+			SET STEP ON
+			THROW
+		ENDTRY
 	ENDPROC