cpan/Pod-Escapes/t/01_about_verbose.t test Pod::Escapes
cpan/Pod-Escapes/t/10_main.t test Pod::Escapes
cpan/Pod-Escapes/t/15_name2charnum.t test Pod::Escapes
-cpan/Pod-LaTeX/LaTeX.pm Convert POD data to LaTeX
+cpan/Pod-LaTeX/lib/Pod/LaTeX.pm Convert POD data to LaTeX
cpan/Pod-LaTeX/pod2latex.PL Precursor for translator to turn pod into LaTeX
cpan/Pod-LaTeX/t/pod2latex.t See if Pod::LaTeX works
cpan/Pod-LaTeX/t/user.t See if Pod::LaTeX works
'Pod::LaTeX' =>
{
'MAINTAINER' => 'tjenness',
- 'DISTRIBUTION' => 'TJENNESS/Pod-LaTeX-0.58.tar.gz',
+ 'DISTRIBUTION' => 'TJENNESS/Pod-LaTeX-0.59.tar.gz',
'FILES' => q[cpan/Pod-LaTeX],
'EXCLUDED' => [ qw( t/require.t ) ],
'UPSTREAM' => undef,
use vars qw/ $VERSION %HTML_Escapes @LatexSections /;
-$VERSION = '0.58';
+$VERSION = '0.59';
# Definitions of =headN -> latex mapping
@LatexSections = (qw/
be written that could be immediately processed by C<latex>.
For some pod escapes it may be necessary to include the amsmath
-package. This is not yet added to the preamble automaatically.
+package. This is not yet added to the preamble automatically.
=cut
=head1 SEE ALSO
-L<Pod::Parser>, L<Pod::Select>, L<pod2latex>
+L<Pod::Parser>, L<Pod::Select>, L<pod2latex>, L<Pod::Simple>.
=head1 AUTHORS
E<lt>hsmyers@sdragons.comE<gt>, Peter J Acklam
E<lt>jacklam@math.uio.noE<gt>, Sudhi Herle E<lt>sudhi@herle.netE<gt>,
Ariel Scolnicov E<lt>ariels@compugen.co.ilE<gt>,
-Adriano Rodrigues Ferreira E<lt>ferreira@triang.com.brE<gt> and
-R. de Vries E<lt>r.de.vries@dutchspace.nlE<gt>.
-
+Adriano Rodrigues Ferreira E<lt>ferreira@triang.com.brE<gt>,
+R. de Vries E<lt>r.de.vries@dutchspace.nlE<gt> and
+Dave Mitchell E<lt>davem@iabyn.comE<gt>.
=head1 COPYRIGHT
+Copyright (C) 2011 Tim Jenness.
Copyright (C) 2000-2004 Tim Jenness. All Rights Reserved.
This program is free software; you can redistribute it and/or modify
=head1 REVISION
-$Id: LaTeX.pm,v 1.19 2004/12/30 01:40:44 timj Exp $
+$Id$
=end __PRIVATE__
# will probably not match what is currently there. You
# will need to adjust it to match (assuming it is correct).
-use Test;
+use Test::More tests => 177;
use strict;
-BEGIN { plan tests => 177 }
-
-use Pod::LaTeX;
-
# The link parsing changed between v0.22 and v0.30 of Pod::ParseUtils
use Pod::ParseUtils;
my $linkver = $Pod::ParseUtils::VERSION;
+BEGIN {
+ use_ok( "Pod::LaTeX" );
+}
+
# Set up an END block to remove the test output file
END {
unlink "test.tex";
};
-ok(1);
-
# First thing to do is to read the expected output from
# the DATA filehandle and store it in a scalar.
# Do this until we read an =pod
# Create a new parser
my $parser = Pod::LaTeX->new;
-ok($parser);
+isa_ok($parser, "Pod::LaTeX");
$parser->Head1Level(1);
# Add the preamble but remember not to compare the timestamps
$parser->AddPreamble(1);
open(INFH, "< test.tex") or die "Unable to read test tex file: $!\n";
my @output = <INFH>;
-ok(@output, @reference);
+is(scalar @output, scalar @reference, "Count lines");
for my $i (0..$#reference) {
next if $reference[$i] =~ /^%%/; # skip timestamp comments
$reference[$i] =~ s/Standard link: \\emph\{Pod::LaTeX\}/Standard link: the \\emph\{Pod::LaTeX\} manpage/;
$reference[$i] =~ s/\\textsf\{sec\} in \\emph\{Pod::LaTeX\}/the section on \\textsf\{sec\} in the \\emph\{Pod::LaTeX\} manpage/;
}
- ok($output[$i], $reference[$i]);
+ is($output[$i], $reference[$i], "Check line $i");
}
close(INFH) or die "Error closing INFH test.tex: $!\n";
# Variant provided by
# Adriano Rodrigues Ferreira <ferreira@triang.com.br>
-use Test;
+use Test::More tests => 17;
use strict;
-BEGIN { plan tests => 17 }
-
-use Pod::LaTeX;
+BEGIN {
+ use_ok( "Pod::LaTeX" );
+}
# The link parsing changed between v0.22 and v0.30 of Pod::ParseUtils
use Pod::ParseUtils;
unlink "test.tex";
};
-ok(1);
-
# First thing to do is to read the expected output from
# the DATA filehandle and store it in a scalar.
# Do this until we read an =pod
);
my $parser = Pod::LaTeX->new(%params);
-ok($parser);
+isa_ok($parser, "Pod::LaTeX");
# Create an output file
open(OUTFH, "> test.tex" ) or die "Unable to open test tex file: $!\n";
open(INFH, "< test.tex") or die "Unable to read test tex file: $!\n";
my @output = <INFH>;
-ok(@output, @reference);
+is(scalar @output, scalar @reference, "Count lines");
for my $i (0..$#reference) {
next if $reference[$i] =~ /^%%/; # skip timestamp comments
- ok($output[$i], $reference[$i]);
+ is($output[$i], $reference[$i], "Compare line $i");
}
close(INFH) or die "Error closing INFH test.tex: $!\n";
=item *
+C<Pod::LaTeX> has been upgraded from version 0.58 to 0.59
+
+=item *
+
C<Term::UI> has been upgraded from version 0.20 to 0.24
=item *