summaryrefslogtreecommitdiff
path: root/www/p5-HTML-Template-JIT/files/patch-t::10escape.t
diff options
context:
space:
mode:
authorMathieu Arnold <mat@FreeBSD.org>2004-08-19 16:20:11 +0000
committerMathieu Arnold <mat@FreeBSD.org>2004-08-19 16:20:11 +0000
commit0dcbb3207ce6a44cfa30fb333e3d6067bf9223ce (patch)
tree9648b1b78eeba2a08498e52dd9a154a5465d8d2a /www/p5-HTML-Template-JIT/files/patch-t::10escape.t
parentAdd myself, my mentor :p (diff)
Add some patches :
+ Fix 8bit symbols escaping. + Allow blessed hashrefs in loops. + Fix a portlint warning and make it not clutter perllocal.pod PR: 70656 Submitted by: Alex Kapranoff <kappa@rambler-co.ru>
Notes
Notes: svn path=/head/; revision=116698
Diffstat (limited to 'www/p5-HTML-Template-JIT/files/patch-t::10escape.t')
-rw-r--r--www/p5-HTML-Template-JIT/files/patch-t::10escape.t22
1 files changed, 22 insertions, 0 deletions
diff --git a/www/p5-HTML-Template-JIT/files/patch-t::10escape.t b/www/p5-HTML-Template-JIT/files/patch-t::10escape.t
new file mode 100644
index 000000000000..a2f5f54eab5f
--- /dev/null
+++ b/www/p5-HTML-Template-JIT/files/patch-t::10escape.t
@@ -0,0 +1,22 @@
+--- t/10escape.t Tue May 18 18:39:12 2004
++++ t/10escape.t Tue May 18 18:42:03 2004
+@@ -1,4 +1,4 @@
+-use Test::More tests => 3;
++use Test::More tests => 4;
+ use HTML::Template::JIT;
+ my $debug = 0;
+
+@@ -35,3 +35,13 @@
+ $output = $template->output;
+ like($output, qr/Some URL escaped stuff:/);
+
++# test 8bit char in urlescaped var
++$template = HTML::Template::JIT->new(
++ filename => 'urlescape.tmpl',
++ path => ['t/templates'],
++ jit_path => 't/jit_path',
++ jit_debug => $debug,
++ );
++$template->param(STUFF => "\xf4"); #"
++$output = $template->output;
++like($output, qr/%F4/); #"