Use shipped perl modules when calling perl programs at build time

ChangeLog

@@ -1,3 +1,9 @@
+2007-10-10  Guillem Jover  <guillem@debian.org>
+
+	* m4/arch.m4(_DPKG_ARCHITECTURE): Set PERL5LIB when calling
+	dpkg-architecture.pl to use the shipped perl modules instead of
+	the system ones.
+
 2007-10-09  Guillem Jover  <guillem@debian.org>
 
 	* scripts/dpkg-gensymbols.pl: Use new Dpkg module. Do not declare

debian/changelog

@@ -38,6 +38,9 @@ dpkg (1.14.8) UNRELEASED; urgency=low
   * Various small fixes to the manpages suggested by Helge Kreutzmann.
     Closes: #445858
 
+  [ Guillem Jover ]
+  * Use shipped perl modules when calling perl programs at build time.
+
   [ Updated dpkg translations ]
   * Polish (Robert Luberda).
 

m4/arch.m4

@@ -4,7 +4,8 @@
 # the target architecture, to avoid duplicating its logic.
 AC_DEFUN([_DPKG_ARCHITECTURE], [
 AC_REQUIRE([AC_CANONICAL_SYSTEM])dnl
-$2="`cd $srcdir/scripts; ./dpkg-architecture.pl -t$target -q$1 2>/dev/null`"
+$2="`cd $srcdir/scripts; \
+     PERL5LIB=$(pwd) ./dpkg-architecture.pl -t$target -q$1 2>/dev/null`"
 ])# _DPKG_ARCHITECURE
 
 # DPKG_CPU_TYPE