--- a/common/tools/ats/bctest/locationsrv/locblid/locblid.pl Tue Sep 29 17:34:45 2009 +0100
+++ b/common/tools/ats/bctest/locationsrv/locblid/locblid.pl Thu Oct 01 13:19:42 2009 +0100
@@ -20,16 +20,16 @@
use File::Path;
unlink "locblidtest.zip";
-##rmtree "temp";
+rmtree "temp";
mkpath "temp/locblidtest/general/testframework";
mkpath "temp/locblidtest/winscw_udeb";
my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
copy("locblid.xml", "temp/test.xml");
-copy($epoc . "release/winscw/udeb/BCBlidTest.dll", "temp/locblidtest/winscw_udeb/BCBlidTest.dll");
-copy($epoc . "winscw/c/testframework/testframework_locblid.ini", "temp/locblidtest/general/testframework/testframework_locblid.ini");
-copy($epoc . "winscw/c/testframework/tcLmkBlid.cfg", "temp/locblidtest/general/testframework/tcLmkBlid.cfg");
-copy($epoc . "winscw/c/testframework/UI_BCBLid.cfg", "temp/locblidtest/general/testframework/UI_BCBLid.cfg");
+copy($epoc . "release/winscw/udeb/BCBlidTest.dll", "temp/locblidtest/winscw_udeb/BCBlidTest.dll") or die "failed : $!";
+copy($epoc . "winscw/c/testframework/testframework_locblid.ini", "temp/locblidtest/general/testframework/testframework_locblid.ini") or die "failed : $!";
+copy($epoc . "winscw/c/testframework/tcLmkBlid.cfg", "temp/locblidtest/general/testframework/tcLmkBlid.cfg") or die "failed : $!";
+copy($epoc . "winscw/c/testframework/UI_BCBLid.cfg", "temp/locblidtest/general/testframework/UI_BCBLid.cfg") or die "failed : $!";
system("7z a -tzip locblidtest.zip ./temp/*");