dh_installpam

   1 #!/usr/bin/perl -w
   2
   3 =head1 NAME
   4
   5 dh_installpam - install pam support files
   6
   7 =cut
   8
   9 use strict;
  10 use Debian::Debhelper::Dh_Lib;
  11
  12 =head1 SYNOPSIS
  13
  14   dh_installpam [debhelper options] [-n]
  15
  16 =head1 DESCRIPTION
  17
  18 dh_installpam is a debhelper program that is responsible for installing
  19 files used by PAM into package build directories.
  20
  21 If a file named debian/package.pam exists, then it is installed into
  22 etc/pam.d/package in the package build directory.
  23
  24 =cut
  25
  26 init();
  27
  28 foreach my $package (@{$dh{DOPACKAGES}}) {
  29         my $tmp=tmpdir($package);
  30         my $pam=pkgfile($package,"pam");
  31
  32         if ($pam ne '') {
  33                 if (! -d "$tmp/etc/pam.d") {
  34                         doit("install","-d","$tmp/etc/pam.d");
  35                 }
  36                 doit("install","-p","-m644",$pam,"$tmp/etc/pam.d/$package");
  37         }
  38 }
  39
  40 =head1 SEE ALSO
  41
  42 L<debhelper(1)>
  43
  44 This program is a part of debhelper.
  45
  46 =head1 AUTHOR
  47
  48 Joey Hess <joeyh@debian.org>
  49
  50 =cut