From 0217abfc1a25c730f4a2cd72f8afc89a206da4ab Mon Sep 17 00:00:00 2001 From: nott Date: Mon, 14 Apr 2008 16:58:54 +0000 Subject: [PATCH] In create+postscripts_tar() the gzip call needs a "-f". git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1048 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT-2.0/xCAT/Utils.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/perl-xCAT-2.0/xCAT/Utils.pm b/perl-xCAT-2.0/xCAT/Utils.pm index fc2901ab4..8b5cd59c8 100644 --- a/perl-xCAT-2.0/xCAT/Utils.pm +++ b/perl-xCAT-2.0/xCAT/Utils.pm @@ -426,7 +426,7 @@ sub get_site_attribute my $sitetab = xCAT::Table->new('site'); if ($sitetab) { - (my $ref) = $sitetab->getAttribs({key => $attr}, 'value'); + (my $ref) = $sitetab->getAttribs({key => $attr}, value); if ($ref and $ref->{value}) { $values = $ref->{value}; @@ -817,7 +817,7 @@ rmdir(\"/tmp/.ssh\");"; # send the keys to the nodes # my $cmd = "$::REMOTESHELL_EXPECT -s $n_str"; - $rc = system("$cmd") >> 8; + my $rc = system("$cmd") >> 8; if ($rc) { my %rsp; @@ -1788,7 +1788,7 @@ sub create_postscripts_tar mkdir("/install/autoinst"); } - $cmd = "cd /install/postscripts; tar -cf /install/autoinst/xcatpost.tar * .ssh/*; gzip /install/autoinst/xcatpost.tar"; + $cmd = "cd /install/postscripts; tar -cf /install/autoinst/xcatpost.tar * .ssh/*; gzip -f /install/autoinst/xcatpost.tar"; my @result = xCAT::Utils->runcmd($cmd, 0); if ($::RUNCMD_RC != 0) {