summaryrefslogtreecommitdiff
path: root/dh_installpam
diff options
context:
space:
mode:
Diffstat (limited to 'dh_installpam')
-rwxr-xr-xdh_installpam53
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