Applied patches from Joel Granados.

[tinyos-2.x.git] / tools / release / extractor

diff --git a/tools/release/extractor b/tools/release/extractor
index dc9b894f4c74eb792d8d0fe5eed482ed5b8ae449..97679f5bf098910a64a93676681c8d2df37843c0 100755 (executable)
--- a/tools/release/extractor
+++ b/tools/release/extractor
@@ -1,5 +1,6 @@
 #!/usr/bin/perl
 $name = $ARGV[0];
+$file_path = $ARGV[1];
 
 @files = split /\n/, `find .`;
 @result = @files;
@@ -20,7 +21,7 @@ mkdir $name;
 open TAR, "|tar cf - -T - --no-recursion | tar xf - -C $name";
 print TAR join("\n", @result);
 close TAR;
-#print join("\n", @result);
-system("tar cf - $name");
+system("tar cfz $file_path $name");
+system("rm -rf $name");