common/tools/ats/bctest/browser/browser.pl
changeset 525 5fdd56755c8a
parent 458 ef8c69f2539d
child 552 8018a074606b
equal deleted inserted replaced
518:50d29d0828e9 525:5fdd56755c8a
    18 use strict;
    18 use strict;
    19 use File::Copy;
    19 use File::Copy;
    20 use File::Path;
    20 use File::Path;
    21 
    21 
    22 unlink "browser.zip";
    22 unlink "browser.zip";
    23 ##rmtree "temp";
    23 rmtree "temp";
    24 mkpath "temp/bcbrowser/winscw_udeb";
    24 mkpath "temp/bcbrowser/winscw_udeb";
    25 mkpath "temp/bcbrowser/general/testframework";
    25 mkpath "temp/bcbrowser/general/testframework";
    26 
    26 
    27 my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
    27 my $epoc=$ENV{'EPOCROOT'} . "epoc32/";
    28 copy("browser.xml", "temp/test.xml");
    28 copy("browser.xml", "temp/test.xml");