If available, use ripunzip also for extracting specific files
Change-Id: I27eb84bc0a26621018320c19cb41ae79a8ad1da2
diff --git a/lib/KorAP/XML/Archive.pm b/lib/KorAP/XML/Archive.pm
index 7e46f79..8f2834f 100644
--- a/lib/KorAP/XML/Archive.pm
+++ b/lib/KorAP/XML/Archive.pm
@@ -291,10 +291,15 @@
my $first = 1;
- my @init_cmd = (
- 'unzip', # Use unzip program
- '-qo', # quietly overwrite all existing files
- '-uo',
+ # Ensure ripunzip availability is checked
+ test_ripunzip();
+
+ my @init_cmd = ($RIPUNZIP_AVAILABLE ?
+ # Use ripunzip program
+ ('ripunzip', 'unzip-file', '-q')
+ :
+ # Use InfoZIP unzip program
+ ('unzip', '-qo', '-uo')
);
my @cmds;