# HG changeset patch # User Dario Sestito # Date 1249468228 -3600 # Node ID c2062b9445d0ed6258728217effe80e7062d3957 # Parent 4d500511bf5a67c00e478f9ccd9574b4cbc8303f Fix wrong computation of build drive directory diff -r 4d500511bf5a -r c2062b9445d0 build_package.pl --- a/build_package.pl Wed Aug 05 11:16:03 2009 +0100 +++ b/build_package.pl Wed Aug 05 11:30:28 2009 +0100 @@ -244,10 +244,12 @@ print "rmdir /S $sWORKING_DRIVE\\$sJOB_BASE_DIR\\$sJobLabel\n"; system("rmdir /S /Q $sWORKING_DRIVE\\$sJOB_BASE_DIR\\$sJobLabel"); } - if (-d "$sWORKING_DRIVE\\fbf_job\\$sJobNumberKey.$nJobNumber") # build drive + my $sBuildLabel = $sJobNumberKey; + $sBuildLabel =~ s/\.T$//; + if (-d "$sWORKING_DRIVE\\fbf_job\\$sBuildLabel.$nJobNumber") # build drive { - print "rmdir /S $sWORKING_DRIVE\\fbf_job\\$sJobNumberKey.$nJobNumber\n"; - system("rmdir /S /Q $sWORKING_DRIVE\\fbf_job\\$sJobNumberKey.$nJobNumber"); + print "rmdir /S $sWORKING_DRIVE\\fbf_job\\$sBuildLabel.$nJobNumber\n"; + system("rmdir /S /Q $sWORKING_DRIVE\\fbf_job\\$sBuildLabel.$nJobNumber"); } }