| commit | d5643ade925f1033721d862143c75a3351a79f37 | [log] [tgz] |
|---|---|---|
| author | Akron <nils@diewald-online.de> | Tue Jul 04 20:27:13 2017 +0200 |
| committer | Akron <nils@diewald-online.de> | Tue Jul 04 20:27:13 2017 +0200 |
| tree | cb899497d4d04766c779428a2cebad525054749f | |
| parent | 9b67b93e0209063f28892a91da83ee20a4f39fbd [diff] |
Warn on missing output parameter in extract Change-Id: Ic8dffb5527973d5c0bc57b5d193d9f98fdb7be45
diff --git a/script/korapxml2krill b/script/korapxml2krill index 502727b..acf8d63 100644 --- a/script/korapxml2krill +++ b/script/korapxml2krill
@@ -635,6 +635,9 @@ # Extract XML files if ($cmd eq 'extract') { + # Output is required + pod2usage(%ERROR_HASH) unless $output; + # Create new archive object if (-f($input[0]) && (my $archive = KorAP::XML::Archive->new($input[0]))) {