vos: remaddrs sub-command

[openafs.git] / doc / man-pages / generate-html

diff --git a/doc/man-pages/generate-html b/doc/man-pages/generate-html
index e905231..d46c80f 100755 (executable)
--- a/doc/man-pages/generate-html
+++ b/doc/man-pages/generate-html
@@ -98,6 +98,7 @@ our $HEADER = <<'EOH';
 EOH
 
 our %HEADINGS = (1 => 'User Commands',
+                 3 => 'C Library Functions',
                  5 => 'Configuration and Data Files',
                  8 => 'Administrator Commands');
 
@@ -105,11 +106,11 @@ our %HEADINGS = (1 => 'User Commands',
 # description, returning that as an array.
 sub scan_names {
     my @index;
-    for my $dir (qw(pod1 pod5 pod8)) {
+    for my $dir (qw(pod1 pod3 pod5 pod8)) {
         my $section = $dir;
         $section =~ s/^pod//;
         opendir (D, $dir) or die "Cannot open $dir: $!\n";
-        for my $file (sort grep { !/^\./ && !/CVS/ } readdir D) {
+        for my $file (sort grep { !/^\./ && /\.pod$/ } readdir D) {
             open (F, "$dir/$file") or die "Cannot open $dir/$file: $!\n";
             my ($name, $desc);
             local $_;
@@ -122,6 +123,9 @@ sub scan_names {
                 warn "$dir/$file: cannot find NAME section, skipping\n";
             }
             $name =~ s/^(backup|bos|fs|fstrace|kas|pts|symlink|uss|vos)_/$1 /;
+           if ($section eq '3') {
+               $name =~ s/^AFS\./AFS::/;
+           }
             if ($section eq '5') {
                 $name =~ s/_/ /g;
             }
@@ -137,7 +141,7 @@ sub scan_names {
 unless (-d 'html') {
     mkdir ('html', 0755) or die "Cannot create html directory: $!\n";
 }
-for my $dir (qw(pod1 pod5 pod8)) {
+for my $dir (qw(pod1 pod3 pod5 pod8)) {
     my $section = $dir;
     $section =~ s/^pod//;
     mkdir ("html/$section", 0755) unless -d "html/$section";