Test zip overwriting
Change-Id: Id73c0b5120c6cb2f833e983ba92605a93228f45b
diff --git a/lib/KorAP/XML/Archive.pm b/lib/KorAP/XML/Archive.pm
index 29b43a7..5dd6855 100644
--- a/lib/KorAP/XML/Archive.pm
+++ b/lib/KorAP/XML/Archive.pm
@@ -27,6 +27,7 @@
return;
};
+
# Check the compressed archive
sub test {
my $self = shift;
@@ -145,6 +146,7 @@
my @init_cmd = (
'unzip', # Use unzip program
'-qo', # quietly overwrite all existing files
+ '-o',
'-d', $target_dir # Extract into target directory
);
@@ -218,6 +220,7 @@
my @init_cmd = (
'unzip', # Use unzip program
'-qo', # quietly overwrite all existing files
+ '-o',
'-d', $target_dir # Extract into target directory
);
@@ -275,6 +278,7 @@
my @init_cmd = (
'unzip', # Use unzip program
'-qo', # quietly overwrite all existing files
+ '-o',
'-d', $target_dir # Extract into target directory
);