You are viewing a plain text version of this content. The canonical link for it is here.
Posted to axkit-dev@xml.apache.org by ma...@apache.org on 2003/08/07 12:13:04 UTC
cvs commit: xml-axkit/t 11xsp_attr_value_template.t
matts 2003/08/07 03:13:04
Added: t 11xsp_attr_value_template.t
Log:
Test for attribute value templates. (NB: Currently fails)
Revision Changes Path
1.1 xml-axkit/t/11xsp_attr_value_template.t
Index: 11xsp_attr_value_template.t
===================================================================
use Test;
BEGIN { plan tests => 12 }
use Apache::AxKit::Language::XSP;
# Test for attribute value templates
my $e = {};
{
# test no curlies is OK
my $value = 'value';
my $result = AxKit::XSP::DefaultHandler::_attr_value_template($e, $value);
ok($result);
ok($result !~ /do/);
print $result, "\n";
eval $result;
ok(!$@);
}
{
# test 1 curly is OK
my $value = 'value {{';
my $result = AxKit::XSP::DefaultHandler::_attr_value_template($e, $value);
ok($result);
ok($result !~ /do/);
print $result, "\n";
eval $result;
ok(!$@);
}
{
# test expr is OK
my $value = 'value {time()}';
my $result = AxKit::XSP::DefaultHandler::_attr_value_template($e, $value);
ok($result);
ok($result =~ /do/);
print $result, "\n";
eval $result;
ok(!$@);
}
{
# test 2 expr is OK
my $value = 'value {time()} text {time()}';
my $result = AxKit::XSP::DefaultHandler::_attr_value_template($e, $value);
ok($result);
ok($result =~ /do/);
print $result, "\n";
eval $result;
ok(!$@);
}