#!/usr/bin/perl -w # -*- perl -*- BEGIN { require "./t/pod2html-lib.pl"; } END { rem_test_dir(); } use strict; use Cwd; use File::Spec::Functions; use Test::More tests => 1; SKIP: { my $output = make_test_dir(); skip "$output", 1 if $output; my $cwd = catdir cwd(); # catdir converts path separators to that of the OS # running the test # XXX but why don't the other tests complain about # this? convert_n_test("htmldir5", "test --htmldir and --htmlroot 5", "--podpath=t:testdir/test.lib", "--podroot=$cwd", "--htmldir=$cwd", "--htmlroot=/", "--quiet", ); } __DATA__
htmldir - Test --htmldir feature
Normal text, a link to nowhere,
a link to var-copy,
and another "Another Head 1" in feature.