fixed bug [ 820144 ] Theme problems under Win32
This commit is contained in:
parent
ad774fa69a
commit
4d37075bb3
2 changed files with 10 additions and 2 deletions
|
|
@ -201,7 +201,14 @@ sub tar {
|
|||
chdir $self->getPath;
|
||||
my $temp = WebGUI::Node->new($node1,$node2);
|
||||
$temp->create;
|
||||
Archive::Tar->create_archive($temp->getPath.$session{os}{slash}.$filename,1,$_[0]->getFiles);
|
||||
if ($Archive::Tar::VERSION eq '0.072') {
|
||||
my $tar = Archive::Tar->new();
|
||||
$tar->add_files($_[0]->getFiles);
|
||||
$tar->write($temp->getPath.$session{os}{slash}.$filename,1);
|
||||
|
||||
} else {
|
||||
Archive::Tar->create_archive($temp->getPath.$session{os}{slash}.$filename,1,$_[0]->getFiles);
|
||||
}
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue