diff options
author | joey <joey> | 2002-10-05 17:55:42 +0000 |
---|---|---|
committer | joey <joey> | 2002-10-05 17:55:42 +0000 |
commit | 65ccc28c2f9abfdf88e7250b55ce3b7561e68a6f (patch) | |
tree | 012496bcbfa781e32a91cb380411e17f04e945d7 /dh_fixperms | |
parent | 09f9fc78318d6f9219ff1f457abe5ff050eb6ea1 (diff) |
r554: * dh_fixperms: Make sure .pm files are 0644. Closes: #163418
Diffstat (limited to 'dh_fixperms')
-rwxr-xr-x | dh_fixperms | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/dh_fixperms b/dh_fixperms index 145d7361..39001a54 100755 --- a/dh_fixperms +++ b/dh_fixperms @@ -68,6 +68,17 @@ foreach my $package (@{$dh{DOPACKAGES}}) { complex_doit("find $tmp/usr/share/man $tmp/usr/man/ $tmp/usr/X11*/man/ -type f", "$find_options -print0 2>/dev/null | xargs -0r chmod 644"); + # ..and so are executable shared and static libraries + # (and .la files from libtool) .. + complex_doit("find $tmp -perm -5 -type f", + "\\( -name '*.so*' -or -name '*.la' -or -name '*.a' \\) $find_options -print0", + "2>/dev/null | xargs -0r chmod 644"); + + # .. and perl modules. + complex_doit("find $tmp/usr/lib/perl5 $tmp/usr/share/perl5 -type f", + "-perm -5 -name '*.pm' $find_options -print0", + "2>/dev/null | xargs -0r chmod a-X"); + # v4 only if (! compat(3)) { # Programs in the bin and init.d dirs should be executable.. @@ -79,11 +90,6 @@ foreach my $package (@{$dh{DOPACKAGES}}) { } } - # ..and so are executable shared and static libraries - # (and .la files from libtool) - complex_doit("find $tmp -perm -5 -type f", - "\\( -name '*.so*' -or -name '*.la' -or -name '*.a' \\) $find_options -print0", - "2>/dev/null | xargs -0r chmod a-X"); } =head1 SEE ALSO |