Don't claim a function conforms to XSSO when it doesn't.

Sponsored by:	DARPA, NAI Labs


git-svn-id: svn+ssh://svn.openpam.org/svn/openpam/trunk@73 185d5e19-27fe-0310-9dcf-9bff6b9f3609
This commit is contained in:
Dag-Erling Smørgrav 2002-02-22 21:22:30 +00:00
parent 4b5df4ce1a
commit a05b905e44
1 changed files with 19 additions and 8 deletions

View File

@ -236,6 +236,9 @@ sub parse_source($) {
if ($source =~ m/^ \* NOLIST\s*$/m) { if ($source =~ m/^ \* NOLIST\s*$/m) {
$FUNCTIONS{$func}->{'nolist'} = 1; $FUNCTIONS{$func}->{'nolist'} = 1;
} }
if ($source !~ m/^ \* XSSO \d/m) {
$FUNCTIONS{$func}->{'openpam'} = 1;
}
} }
sub expand_errors($); sub expand_errors($);
@ -339,12 +342,20 @@ on failure.
while (@xref) { while (@xref) {
$mdoc .= ".Xr " . shift(@xref) . (@xref ? " ,\n" : "\n"); $mdoc .= ".Xr " . shift(@xref) . (@xref ? " ,\n" : "\n");
} }
$mdoc .= ".Sh STANDARDS $mdoc .= ".Sh STANDARDS\n";
.Rs if ($func->{'openpam'}) {
$mdoc .= "The
.Nm
function is an OpenPAM extension.
";
} else {
$mdoc .= ".Rs
.%T \"X/Open Single Sign-On Service (XSSO) - Pluggable Authentication Modules\" .%T \"X/Open Single Sign-On Service (XSSO) - Pluggable Authentication Modules\"
.%D \"June 1997\" .%D \"June 1997\"
.Re .Re
.Sh AUTHORS ";
}
$mdoc .= ".Sh AUTHORS
The The
.Nm .Nm
function and this manual page were developed for the FreeBSD Project function and this manual page were developed for the FreeBSD Project