]> git.donarmstrong.com Git - debhelper.git/blob - dh_installpam
r420: big monsta changes
[debhelper.git] / dh_installpam
1 #!/usr/bin/perl -w
2 #
3 # Integration with debian pam system:
4 #
5 # If debian/pam file exists, save it to $tmp/etc/pam.d/$package
6
7 use strict;
8 use Debian::Debhelper::Dh_Lib;
9 init();
10
11 foreach my $package (@{$dh{DOPACKAGES}}) {
12         my $tmp=tmpdir($package);
13         my $pam=pkgfile($package,"pam");
14         
15         if ($pam ne '') {
16                 if (! -d "$tmp/etc/pam.d") {
17                         doit("install","-d","$tmp/etc/pam.d");
18                 }
19                 doit("install","-p","-m644",$pam,"$tmp/etc/pam.d/$package");
20         }
21 }