common/tools/raptor/releaseables.pm
changeset 791 9054e820b1e6
parent 764 d00048f1b036
--- a/common/tools/raptor/releaseables.pm	Mon Nov 23 15:01:01 2009 +0000
+++ b/common/tools/raptor/releaseables.pm	Thu Nov 26 16:02:05 2009 +0000
@@ -90,8 +90,7 @@
 
 sub on_start_buildlog
 {
-	system("rmdir /S /Q $::raptorbitsdir/releaseables") if (-d "$::basedir/releaseables");
-	mkdir("$::raptorbitsdir/releaseables");
+	
 }
 
 sub on_start_whatlog
@@ -229,10 +228,10 @@
 			my $layer = $1;
 			my $package = $2;
 			
-			mkdir("$::raptorbitsdir/releaseables/$layer");
-			mkdir("$::raptorbitsdir/releaseables/$layer/$package");
+			mkdir("$::basedir/releaseables/$layer");
+			mkdir("$::basedir/releaseables/$layer/$package");
 			
-			my $filename = "$::raptorbitsdir/releaseables/$layer/$package/info.tsv";
+			my $filename = "$::basedir/releaseables/$layer/$package/info.tsv";
 			
 			print "Writing info file $filename\n" if (!-f$filename);
 			open(FILE, ">>$filename");