From 338fcddd1efab4459741f4c638cbd02ecc7ac614 Mon Sep 17 00:00:00 2001
From: farblos <43711228+farblos@users.noreply.github.com>
Date: Fri, 10 Apr 2020 17:49:48 +0200
Subject: [PATCH] Fixed sub-issue 5 of Github issue #75 (and Github issue #74).

---
 t/common.pm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/t/common.pm b/t/common.pm
index 29096aa..6af8902 100644
--- a/t/common.pm
+++ b/t/common.pm
@@ -202,6 +202,15 @@ elsif (! $uztWorks) {
     $uztOutErr .= "Exit value $uztExitVal\n";
 }
 
+# Unfortunately, test file "t/data/simple.zip" used above results
+# in "false positives" on FreeBSD 9 and 10, which use their own,
+# misbehaving, libarchive-based versions of unzip.  So explicitly
+# declare "unzip -t" to be not working on these systems.
+if ($uztWorks && $^O eq 'freebsd' && $Config{'osvers'} =~ /\A(?:9|10)\./) {
+    $uztWorks = 0;
+    $uztOutErr .= "Misbehaving unzip on FreeBSD 9 and 10\n";
+}
+
 # Check whether we can write through a (non-seekable) pipe
 my $pipeCommand = '| "' . $Config{'perlpath'} . '" -pe "BEGIN{binmode(STDIN);binmode(STDOUT)}" >';
 my $pipeError = "";