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:
lissav 2011-09-28 18:15:11 +00:00
parent c8d56a7f29
commit 88f0c8b0ae

View File

@ -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";