fix tar when no directory input
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10664 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
c8d56a7f29
commit
88f0c8b0ae
@ -43,7 +43,7 @@ if ($^O =~ /^aix/i) { die "Error: this command is not yet supported on AIX.\n";
|
||||
|
||||
my $destdir = scalar(@ARGV) ? $ARGV[0] : '.';
|
||||
chdir($destdir);
|
||||
|
||||
my $docdir = $ENV{'PWD'};
|
||||
# Download the HTML
|
||||
mkdir('html');
|
||||
chdir('html');
|
||||
@ -70,7 +70,7 @@ foreach my $file (@dir) {
|
||||
runh2p($cmd);
|
||||
}
|
||||
# tar and compress
|
||||
chdir($destdir);
|
||||
chdir($docdir);
|
||||
my $date=`date +%Y%m%d%H%M`;
|
||||
chop $date;
|
||||
my $docname="xcat-docs-snap$date.tar";
|
||||
|
Loading…
Reference in New Issue
Block a user