From cedc788e544b9246a18bad413b1760cd2a158f3f Mon Sep 17 00:00:00 2001 From: Kang-min Liu Date: Thu, 3 Mar 2011 13:41:33 +0800 Subject: [PATCH] get rid of those prototype mismatch warnings. --- t/tag-inline.t | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/t/tag-inline.t b/t/tag-inline.t index 45eb8ed..60e12ae 100755 --- a/t/tag-inline.t +++ b/t/tag-inline.t @@ -4,36 +4,36 @@ use strict; package View; use Markapl; -template hr => sub { +template vhr => sub { hr; }; -template br => sub { +template vbr => sub { br; }; -template img => sub { +template vimg => sub { img(src => "/one.jpg"); }; -template meta => sub { +template vmeta => sub { meta(content => "text/html", "http-equiv" => "content-type"); }; -template html_link => sub { +template vhtml_link => sub { html_link(rel=>'stylesheet', href=>'/style.css'); }; -template input => sub { +template vinput => sub { input(type => "text", name => "foo"); }; package main; use Test::More tests => 6; -is(View->render("hr"), qq{
}); -is(View->render("br"), qq{
}); -is(View->render("img"), qq{}); -is(View->render("meta"), qq{}); -is(View->render("html_link"), qq{}); -is(View->render("input"), qq{}); +is(View->render("vhr"), qq{
}); +is(View->render("vbr"), qq{
}); +is(View->render("vimg"), qq{}); +is(View->render("vmeta"), qq{}); +is(View->render("vhtml_link"), qq{}); +is(View->render("vinput"), qq{});