#!/usr/bin/perl
use warnings;
use strict;
+use Cwd qw(getcwd);
use Test::More;
use IkiWiki;
}
else {
ok(! system("make -s ikiwiki.out"));
- @command = qw(perl -I. ./ikiwiki.out
+ @command = ("perl", "-I".getcwd, qw(./ikiwiki.out
--underlaydir=underlays/basewiki
--set underlaydirbase=underlays
- --templatedir=templates);
+ --templatedir=templates));
}
push @command, qw(--plugin meta --disable-plugin htmlscrubber);
qr{<div class="pagecopyright">},
);
-write_build_read_compare(
- 'enclosure',
- q{[[!meta enclosure="ikiwiki/login-selector/wordpress.png"]]},
- qr{<meta name="enclosure" content="/ikiwiki/login-selector/wordpress.png" />},
-);
-
write_build_read_compare(
'author',
q{[[!meta author="Noodly J. Appendage"]]},