diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm b/Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm index 227c23b7f9f..7686cd41477 100644 --- a/Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm +++ b/Master/tlpkg/tlperl/lib/Pod/Simple/HTMLBatch.pm @@ -5,7 +5,7 @@ use strict; use vars qw( $VERSION $HTML_RENDER_CLASS $HTML_EXTENSION $CSS $JAVASCRIPT $SLEEPY $SEARCH_CLASS @ISA ); -$VERSION = '3.14'; +$VERSION = '3.16'; @ISA = (); # Yup, we're NOT a subclass of Pod::Simple::HTML! # TODO: nocontents stylesheets. Strike some of the color variations? @@ -726,7 +726,7 @@ sub _gen_css_wad { 'whtgrng', # white_with_green_on_grey 'grygrnw', # grey_with_green_on_white ) { - my $outname = "$variation\_"; + my $outname = $variation; my $this_css = join "\n", "/* This file is autogenerated. Do not edit. $outname */\n", "\@import url(\"./_$variation.css\");", @@ -735,7 +735,7 @@ sub _gen_css_wad { ; my $name = $outname; $name =~ tr/-_/ /; - $self->add_css( "$outname.css", 0, $name, 0, 0, \$this_css); + $self->add_css( "_$outname.css", 0, $name, 0, 0, \$this_css); } return; @@ -1141,7 +1141,7 @@ directory: =item $batchconv->batch_convert( 'somedir:someother:also' , ...); -This specifies that you want the dirs "somedir", "somother", and "also" +This specifies that you want the dirs "somedir", "someother", and "also" scanned, just as if you'd passed the arrayref C<[qw( somedir someother also)]>. Note that a ":"-separator is normal under Unix, but Under MSWin, you'll need C<'somedir;someother;also'> @@ -1226,7 +1226,7 @@ If you set this to a false value, no contents file will be written. This specifies what string should be put at the beginning of the contents page. The default is a string more or less like this: - + <html> <head><title>Perl Documentation</title></head> <body class='contentspage'> |