From 0c0d0d9cacaa29d66862bf2dd728b24b689559d4 Mon Sep 17 00:00:00 2001
From: Niko Tyni <ntyni@debian.org>
Date: Thu, 17 Oct 2019 11:10:38 +0100
Subject: dh_perl: detect cross built XS modules

When cross building, scan the host architecture search path for Perl
compiled plugins (XS modules) rather than the build architecture one.
---
 dh_perl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/dh_perl b/dh_perl
index d79b7957..ad6cd6dd 100755
--- a/dh_perl
+++ b/dh_perl
@@ -73,6 +73,11 @@ init();
 
 my $vendorlib = substr $Config{vendorlib}, 1;
 my $vendorarch = substr $Config{vendorarch}, 1;
+if (is_cross_compiling()) {
+	my $incdir = perl_cross_incdir();
+	$vendorarch = substr qx/perl -I$incdir -MConfig -e 'print \$Config{vendorarch}'/, 1
+		if defined $incdir;
+}
 
 # Cleaning the paths given on the command line
 foreach (@ARGV) {
-- 
cgit v1.2.3