--- a/common/tools/ats/bctest/appsupport/profilesengine/profilesengine.pl Tue Sep 29 17:34:45 2009 +0100
+++ b/common/tools/ats/bctest/appsupport/profilesengine/profilesengine.pl Thu Oct 01 13:19:42 2009 +0100
@@ -20,15 +20,15 @@
use File::Path;
unlink "profilesengine.zip";
-##rmtree "temp";
+rmtree "temp";
mkpath "temp/bcprofilesengine/general/testframework";
mkpath "temp/bcprofilesengine/winscw_udeb";
my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
copy("profilesengine.xml", "temp/test.xml");
-copy($epoc . "release/winscw/udeb/proengwrapapi.dll", "temp/bcprofilesengine/winscw_udeb/proengwrapapi.dll");
-copy($epoc . "winscw/c/testframework/testframework_proengwrapapi.ini", "temp/bcprofilesengine/general/testframework/testframework_proengwrapapi.ini");
-copy($epoc . "winscw/c/testframework/proengwrapapi.cfg", "temp/bcprofilesengine/general/testframework/proengwrapapi.cfg");
+copy($epoc . "release/winscw/udeb/proengwrapapi.dll", "temp/bcprofilesengine/winscw_udeb/proengwrapapi.dll") or die "failed : $!";
+copy($epoc . "winscw/c/testframework/testframework_proengwrapapi.ini", "temp/bcprofilesengine/general/testframework/testframework_proengwrapapi.ini") or die "failed : $!";
+copy($epoc . "winscw/c/testframework/proengwrapapi.cfg", "temp/bcprofilesengine/general/testframework/proengwrapapi.cfg") or die "failed : $!";
system("7z a -tzip profilesengine.zip ./temp/*");
\ No newline at end of file