# HG changeset patch # User Dario Sestito # Date 1249926000 -3600 # Node ID 42877cd4d8becea79fe4908a769f87cf1788b11c # Parent 71a252d194e6527336b30df9642576ad01c61fc1 Fix REMOTE_LOG_ARCHIVE path string (missing a backslash. Add some debug lines diff -r 71a252d194e6 -r 42877cd4d8be build_package.pl --- a/build_package.pl Mon Aug 10 18:28:49 2009 +0100 +++ b/build_package.pl Mon Aug 10 18:40:00 2009 +0100 @@ -22,7 +22,7 @@ my $sJOB_BASE_DIR="fbf_project"; my $nMAX_JOBDIR_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released my $nLOCK_FILE_MAX_ATTEMPTS = 5; -my $sREMOTE_LOG_ARCHIVE="\\\\bishare\SF_builds"; +my $sREMOTE_LOG_ARCHIVE="\\\\bishare\\SF_builds"; my $sNUMBERS_FILE="\\\\bishare\\SF_builds\\numbers2.txt"; my $sLETTERS_FILE="letters.txt"; my $nMAX_LETTER_AGE_SECONDS = 86400; # max number of seconds after which the letter is forcibly released @@ -269,6 +269,7 @@ # copy console outputs to remote log archive if (-d "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs") { + print "copying console output files to $sTgtDir\n"; my $sTgtDir = "$sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs\\console"; system("mkdir $sTgtDir"); system("copy /Y $sBOOTSTRAP_DIR\\console_bootstrap_$$.txt $sTgtDir"); @@ -276,6 +277,10 @@ system("copy $sJobDir\\sf-config\\console_sfprep_$$.txt $sTgtDir"); system("copy $sJobDir\\sf-config\\console_sfbuildall_$$.txt $sTgtDir"); } +else +{ + print "directory $sREMOTE_LOG_ARCHIVE\\$sPackage\\builds\\$sPlatform\\$sPackage\_$sPlatform.$nJobNumber\\logs doesn't exist.\n"; +} print("cd $sBOOTSTRAP_DIR\n"); chdir("$sBOOTSTRAP_DIR");