projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix calendar images, RT#34237, RT#13852
[freeside.git]
/
rt
/
t
/
00-mason-syntax.t
diff --git
a/rt/t/00-mason-syntax.t
b/rt/t/00-mason-syntax.t
index
1221b7d
..
e87840a
100644
(file)
--- a/
rt/t/00-mason-syntax.t
+++ b/
rt/t/00-mason-syntax.t
@@
-1,5
+1,3
@@
-#!/usr/bin/perl
-
use strict;
use warnings;
use strict;
use warnings;
@@
-11,7
+9,7
@@
find( {
no_chdir => 1,
wanted => sub {
return if /(?:\.(?:jpe?g|png|gif|rej)|\~)$/i;
no_chdir => 1,
wanted => sub {
return if /(?:\.(?:jpe?g|png|gif|rej)|\~)$/i;
- return if m{/\.[^/]+\.sw
p
$}; # vim swap files
+ return if m{/\.[^/]+\.sw
[op]
$}; # vim swap files
return unless -f $_;
local ($@);
ok( eval { compile_file($_) }, "Compiled $File::Find::name ok: $@");
return unless -f $_;
local ($@);
ok( eval { compile_file($_) }, "Compiled $File::Find::name ok: $@");
@@
-22,12
+20,11
@@
use HTML::Mason;
use HTML::Mason::Compiler;
use HTML::Mason::Compiler::ToObject;
BEGIN { require RT::Test; }
use HTML::Mason::Compiler;
use HTML::Mason::Compiler::ToObject;
BEGIN { require RT::Test; }
-use Encode qw(decode_utf8);
sub compile_file {
my $file = shift;
sub compile_file {
my $file = shift;
- my $text =
decode_utf8(
RT::Test->file_content($file));
+ my $text =
Encode::decode( "UTF-8",
RT::Test->file_content($file));
my $compiler = new HTML::Mason::Compiler::ToObject;
$compiler->compile(
my $compiler = new HTML::Mason::Compiler::ToObject;
$compiler->compile(