6 use RT::Test nodb => 1;
13 return if /(?:\.(?:jpe?g|png|gif|rej)|\~)$/i;
14 return if m{/\.[^/]+\.swp$}; # vim swap files
17 ok( eval { compile_file($_) }, "Compiled $File::Find::name ok: $@");
19 }, RT::Test::get_relocatable_dir('../share/html'));
22 use HTML::Mason::Compiler;
23 use HTML::Mason::Compiler::ToObject;
24 BEGIN { require RT::Test; }
25 use Encode qw(decode_utf8);
30 my $text = decode_utf8(RT::Test->file_content($file));
32 my $compiler = new HTML::Mason::Compiler::ToObject;