[Midnightbsd-cvs] mports: magus.pl: bug fixes.

ctriv at midnightbsd.org ctriv at midnightbsd.org
Thu Feb 28 19:08:54 EST 2008


Log Message:
-----------
bug fixes.

Modified Files:
--------------
    mports/Tools/magus/slave:
        magus.pl (r1.10 -> r1.11)

-------------- next part --------------
Index: magus.pl
===================================================================
RCS file: /home/cvs/mports/Tools/magus/slave/magus.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -L Tools/magus/slave/magus.pl -L Tools/magus/slave/magus.pl -u -r1.10 -r1.11
--- Tools/magus/slave/magus.pl
+++ Tools/magus/slave/magus.pl
@@ -1,4 +1,4 @@
- #!/usr/local/bin/perl
+#!/usr/local/bin/perl
 #
 # Copyright (c) 2007 Chris Reinhardt. All rights reserved.
 #
@@ -392,10 +392,13 @@
     
     my $tarball = $current->tarballpath;
     
+    report(debug => "Downloading tree ID $run: $tarball");
+    
     chdir('/usr');
     
-    rmpath('/usr/mports');
-    system("/usr/bin/scp $tarball .");
+    system("/usr/bin/fetch $tarball");
+
+    rmtree('/usr/mports');
     system('/usr/bin/tar xf ' . $current->tarball);
     exec($self, @origARGV);
   }


More information about the Midnightbsd-cvs mailing list