From 8a0b3cb3924374e2fd114bd3f5407f7a43d2a0e9 Mon Sep 17 00:00:00 2001 From: Niko Tyni Date: Sat, 31 May 2014 20:50:33 +0300 Subject: Use vendorlib and vendorarch from Config instead of hardcoding their values $Config{vendorarch} is changing with the perl 5.20 packages, see #748380. --- dh_fixperms | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'dh_fixperms') diff --git a/dh_fixperms b/dh_fixperms index a99a1345..da45ee64 100755 --- a/dh_fixperms +++ b/dh_fixperms @@ -7,6 +7,7 @@ dh_fixperms - fix permissions of files in package build directories =cut use strict; +use Config; use Debian::Debhelper::Dh_Lib; =head1 SYNOPSIS @@ -44,6 +45,9 @@ up a list of things to exclude. init(); +my $vendorlib = substr $Config{vendorlib}, 1; +my $vendorarch = substr $Config{vendorarch}, 1; + foreach my $package (@{$dh{DOPACKAGES}}) { my $tmp=tmpdir($package); @@ -89,7 +93,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) { "2>/dev/null | xargs -0r chmod 644"); # .. and perl modules. - complex_doit("find $tmp/usr/lib/perl5 $tmp/usr/share/perl5 -type f", + complex_doit("find $tmp/$vendorarch $tmp/$vendorlib -type f", "-perm -5 -name '*.pm' $find_options -print0", "2>/dev/null | xargs -0r chmod a-X"); -- cgit v1.2.3