X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=tcl_tests%2Fdgst.try;h=77d6365a28b7f98f563c170f1bf9939202a7f23b;hb=b92c6c80b9a1790933d1fd6817b674e724658dc8;hp=21c2ca7fd29a8fe3377809b8dd7fc214bd01da3e;hpb=b0f5bce10dcc05198e2e58ee08e1cc3dcd3d1aea;p=openssl-gost%2Fengine.git

diff --git a/tcl_tests/dgst.try b/tcl_tests/dgst.try
index 21c2ca7..77d6365 100644
--- a/tcl_tests/dgst.try
+++ b/tcl_tests/dgst.try
@@ -25,7 +25,7 @@ test -createsfiles {dgst.dat dgst0.dat dgst2.dat dgst8.dat dgst63.dat dgst_CF.da
 	makeFile dgst.dat [string repeat "Test data to digest.\n" 100] binary
 	makeFile dgst0.dat "" binary
 	makeFile dgst63.dat "012345678901234567890123456789012345678901234567890123456789012" binary
-	file copy -force ../dgst_CF.dat ../dgst_ex1.dat ../dgst_ex2.dat .
+	file copy -force $::test::src/dgst_CF.dat $::test::src/dgst_ex1.dat $::test::src/dgst_ex2.dat .
 } 0 ""
 
 test "Вычисление дайджеста алгоритмом md_gost12_256" {