diff options
Diffstat (limited to 'dh_installpam')
-rwxr-xr-x | dh_installpam | 53 |
1 files changed, 41 insertions, 12 deletions
diff --git a/dh_installpam b/dh_installpam index 897fd7d8..0f251798 100755 --- a/dh_installpam +++ b/dh_installpam @@ -1,21 +1,50 @@ #!/usr/bin/perl -w -# -# Integration with debian pam system: -# -# If debian/pam file exists, save it to $TMP/etc/pam.d/$PACKAGE -BEGIN { push @INC, "debian", "/usr/share/debhelper" } -use Dh_Lib; +=head1 NAME + +dh_installpam - install pam support files + +=cut + +use strict; +use Debian::Debhelper::Dh_Lib; + +=head1 SYNOPSIS + +B<dh_installpam> [S<I<debhelper options>>] [B<-n>] + +=head1 DESCRIPTION + +dh_installpam is a debhelper program that is responsible for installing +files used by PAM into package build directories. + +If a file named debian/package.pam exists, then it is installed into +etc/pam.d/package in the package build directory. + +=cut + init(); -foreach $PACKAGE (@{$dh{DOPACKAGES}}) { - $TMP=tmpdir($PACKAGE); - $pam=pkgfile($PACKAGE,"pam"); +foreach my $package (@{$dh{DOPACKAGES}}) { + my $tmp=tmpdir($package); + my $pam=pkgfile($package,"pam"); if ($pam ne '') { - if (! -d "$TMP/etc/pam.d") { - doit("install","-d","$TMP/etc/pam.d"); + if (! -d "$tmp/etc/pam.d") { + doit("install","-d","$tmp/etc/pam.d"); } - doit("install","-p","-m644",$pam,"$TMP/etc/pam.d/$PACKAGE"); + doit("install","-p","-m644",$pam,"$tmp/etc/pam.d/$package"); } } + +=head1 SEE ALSO + +L<debhelper(7)> + +This program is a part of debhelper. + +=head1 AUTHOR + +Joey Hess <joeyh@debian.org> + +=cut |