Ignore:
Timestamp:
Oct 16, 2007, 11:20:19 PM (15 years ago)
Author:
quentin
Message:
Use new /mit/scripts/deploy format
Use full path to files in scripts-version file
File:
1 edited

Legend:

Unmodified
Added
Removed
  • locker/update-system/bin/propose-update

    r446 r497  
    4646  my $cwd = cwd();
    4747  chdir($dir) or die $!;
    48   `athrun scripts gtar zxf "/mit/scripts/deploy$scriptsdev/$package.tar.gz"`; $? && die "Failed to unpack $package.tar.gz: $?";
     48  `athrun scripts gtar zxf "/mit/scripts/deploy$scriptsdev/$package/$package.tar.gz"`;
     49  if ($?) { chdir($cwd); system("rmdir", "$dir"); die "Failed to unpack $package.tar.gz: $?"; }
    4950  my @files=`athrun scripts gfind . -mindepth 1 -maxdepth 1 | grep -v .admin`;
    5051  if (@files <= 1) {
     
    6768  my @aonly, @bonly, @both;
    6869  $a = $b = 0;
    69   my $debug = 1;
     70  my $debug = 0;
    7071  local $Data::Dumper::Indent = 0;
    7172  while ($a <= $#a || $b <= $#a) {
Note: See TracChangeset for help on using the changeset viewer.