Reuse the copyright from the last source file for the summary page.
Sponsored by: DARPA, NAI Labs git-svn-id: svn+ssh://svn.openpam.org/svn/openpam/trunk@40 185d5e19-27fe-0310-9dcf-9bff6b9f3609
This commit is contained in:
parent
a139b62d54
commit
b93fb425c5
|
@ -38,7 +38,7 @@
|
|||
use strict;
|
||||
use Fcntl;
|
||||
use POSIX qw(strftime);
|
||||
use vars qw($TODAY %FUNCTIONS);
|
||||
use vars qw($COPYRIGHT $TODAY %FUNCTIONS);
|
||||
|
||||
sub gendoc($) {
|
||||
my $fn = shift;
|
||||
|
@ -66,6 +66,7 @@ sub gendoc($) {
|
|||
$mdoc = $1;
|
||||
$mdoc =~ s,^.\*,.\\\",gm;
|
||||
$mdoc .= "\n.\\\"\n";
|
||||
$COPYRIGHT = $mdoc;
|
||||
} else {
|
||||
$mdoc = ".\\\" \$" . "Id" . "\$\n";
|
||||
}
|
||||
|
@ -135,6 +136,7 @@ as part of the DARPA CHATS research program.
|
|||
|
||||
sub gensummary() {
|
||||
|
||||
print "$COPYRIGHT";
|
||||
print ".Dd $TODAY
|
||||
.Dt PAM 3
|
||||
.Os
|
||||
|
|
Loading…
Reference in a new issue