Improve handling of broken data
Change-Id: I39afa2ad58ce39db3ce171876a0c3a5c540271df
diff --git a/t/script.t b/t/script.t
index 614ba1d..bd3f28d 100644
--- a/t/script.t
+++ b/t/script.t
@@ -735,4 +735,18 @@
};
+subtest 'Broken data testing' => sub {
+ my $file = catfile($f, 'data', 'wikipedia.txt');
+
+ my $t = test_tei2korapxml(
+ tmp => 'script_ginkgo',
+ file => $file,
+ param => '-ti',
+ env => 'KORAPXMLTEI_DEBUG=1'
+ )->stderr_like(qr!No opened zip file to close!)
+ ->stderr_like(qr!Debugging is activated!);
+};
+
+
+
done_testing;