From 8a9dd8d83acfbffa2afefeded2dac20bd9bd08f8 Mon Sep 17 00:00:00 2001 From: Salvatore Bonaccorso Date: Fri, 15 Jul 2022 16:41:45 +0200 Subject: Test installed scripts when run under autopkgtest Origin: vendor Forwarded: not-needed Reviewed-by: gregor herrmann Last-Update: 2022-07-15 Gbp-Pq: Name autopkgtest.patch --- t/11mimeinfo.t | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/t/11mimeinfo.t b/t/11mimeinfo.t index 01a19ea..c1d3298 100644 --- a/t/11mimeinfo.t +++ b/t/11mimeinfo.t @@ -16,10 +16,11 @@ if (!File::MimeInfo::has_mimeinfo_database()) { my $empty_dir = File::Temp::tempdir(); -my $mimetype_file = File::Spec->catfile($Bin, '..', 'mimetype'); +my $mimetype_file = $ENV{AUTOPKGTEST_TMP} ? '/usr/bin/mimetype' : File::Spec->catfile($Bin, '..', 'mimetype'); +my $mimeopen_file = $ENV{AUTOPKGTEST_TMP} ? '/usr/bin/mimeopen' : File::Spec->catfile($Bin, '..', 'mimeopen'); my %tests = ( - 'mimeopen', 'application/x-perl', + $mimeopen_file, 'application/x-perl', 't/test.png', 'image/png', ); -- cgit v1.2.3