From: Russ Allbery Date: Mon, 14 Jul 2008 02:45:14 +0000 (+0000) Subject: man-page-html-generation-hack-20080713 X-Git-Tag: openafs-devel-1_5_61~977 X-Git-Url: https://git.michaelhowe.org/gitweb/?a=commitdiff_plain;h=2a92f43987cd08dc0134b775e0d118894d22d3e5;p=packages%2Fo%2Fopenafs.git man-page-html-generation-hack-20080713 LICENSE BSD Pod::Simple::Search ignores every POD file that doesn't "look right," which means it skips files containing a period (like krb.conf.pod) unless you set a search option. Pod::Simple::HTMLBatch has no way to set search options. Apply a truly horrible hack to get around this. --- diff --git a/doc/man-pages/generate-html b/doc/man-pages/generate-html index 9bde41b7a..610a7db03 100755 --- a/doc/man-pages/generate-html +++ b/doc/man-pages/generate-html @@ -59,6 +59,24 @@ $Pod::Simple::HTML::Tagmap{'/item-bullet'} = '

'; $Pod::Simple::HTML::Tagmap{'item-number'} = '

  • '; $Pod::Simple::HTML::Tagmap{'/item-number'} = '

    • '; +# This horrific hack is required because Pod::Simple::HTMLBatch has no way +# of setting search options and we have to set laborious to true in order +# to pick up man pages like krb.conf(5). +package OpenAFS::Search; + +use strict; +use vars qw(@ISA); + +use Pod::Simple::Search; +@ISA = qw(Pod::Simple::HTML); + +sub new { + my $class = shift; + my $object = Pod::Simple::Search->new; + $object->laborious (1); + return $object; +} + package main; use strict; @@ -66,6 +84,9 @@ use strict; use File::Copy; use Pod::Simple::HTMLBatch; +# Override the search class to set laborious. +$Pod::Simple::HTMLBatch::SEARCH_CLASS = 'OpenAFS::Search'; + our $HEADER = <<'EOH';