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

Whitespace cleanup. 

git-svn-id: svn+ssh://svn.openpam.org/svn/openpam/trunk@231 185d5e19-27fe-0310-9dcf-9bff6b9f3609
This commit is contained in:
Dag-Erling Smørgrav 2003-05-24 19:34:16 +00:00
parent 24e145dd10
commit bd68953705
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
misc/gendoc.pl
View File

@ -32,7 +32,7 @@
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE. # SUCH DAMAGE.
# #
# $P4: //depot/projects/openpam/misc/gendoc.pl#23 $ # $P4: //depot/projects/openpam/misc/gendoc.pl#24 $
# #
use strict; use strict;
@ -494,7 +494,7 @@ sub gensummary($) {
while (<STDIN>) { while (<STDIN>) {
if (m/^\.Xr (\S+)\s*(\d)\s*$/) { if (m/^\.Xr (\S+)\s*(\d)\s*$/) {
$xref{$1} = $2; $xref{$1} = $2;
} }
print FILE $_; print FILE $_;
} }
@ -514,14 +514,14 @@ The following return codes are defined by
print FILE ".Xr openpam 3\n" print FILE ".Xr openpam 3\n"
if ($page eq 'pam'); if ($page eq 'pam');
foreach $func (keys(%FUNCTIONS)) { foreach $func (keys(%FUNCTIONS)) {
$xref{$func} = 3; $xref{$func} = 3;
} }
my @refs = sort(keys(%xref)); my @refs = sort(keys(%xref));
while ($_ = shift(@refs)) { while ($_ = shift(@refs)) {
print FILE ".Xr $_ $xref{$_}"; print FILE ".Xr $_ $xref{$_}";
print FILE " ," print FILE " ,"
if (@refs); if (@refs);
print FILE "\n"; print FILE "\n";
} }
print FILE ".Sh STANDARDS print FILE ".Sh STANDARDS
.Rs .Rs