OpenPAM/OpenPAM
OpenPAM/OpenPAM
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Reuse the copyright from the last source file for the summary page.

Browse source 
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:
Dag-Erling Smørgrav 2002-02-07 12:30:25 +00:00
parent a139b62d54
commit b93fb425c5
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
misc/gendoc.pl
View file

@ -38,7 +38,7 @@
use strict; use strict;
use Fcntl; use Fcntl;
use POSIX qw(strftime); use POSIX qw(strftime);
use vars qw($TODAY %FUNCTIONS); use vars qw($COPYRIGHT $TODAY %FUNCTIONS);
sub gendoc($) { sub gendoc($) {
my $fn = shift; my $fn = shift;
@ -66,6 +66,7 @@ sub gendoc($) {
$mdoc = $1; $mdoc = $1;
$mdoc =~ s,^.\*,.\\\",gm; $mdoc =~ s,^.\*,.\\\",gm;
$mdoc .= "\n.\\\"\n"; $mdoc .= "\n.\\\"\n";
$COPYRIGHT = $mdoc;
} else { } else {
$mdoc = ".\\\" \$" . "Id" . "\$\n"; $mdoc = ".\\\" \$" . "Id" . "\$\n";
} }
@ -135,6 +136,7 @@ as part of the DARPA CHATS research program.
sub gensummary() { sub gensummary() {
print "$COPYRIGHT";
print ".Dd $TODAY print ".Dd $TODAY
.Dt PAM 3 .Dt PAM 3
.Os .Os