projects
/
liburi-template-perl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Imported upstream version 0.10
[liburi-template-perl.git]
/
t
/
11-ordered.t
diff --git
a/t/11-ordered.t
b/t/11-ordered.t
index
a160818
..
c96a184
100644
(file)
--- a/
t/11-ordered.t
+++ b/
t/11-ordered.t
@@
-9,7
+9,11
@@
use_ok( 'URI::Template' );
my $text = 'http://foo.com/{arg2}/{arg1}';
my $template = URI::Template->new( $text );
isa_ok( $template, 'URI::Template' );
my $text = 'http://foo.com/{arg2}/{arg1}';
my $template = URI::Template->new( $text );
isa_ok( $template, 'URI::Template' );
- is_deeply( [ $template->all_variables ], [ qw( arg2 arg1 ) ], 'all_variables()' );
+ is_deeply(
+ [ $template->all_variables ],
+ [ qw( arg2 arg1 ) ],
+ 'all_variables()'
+ );
{
my $result = $template->process( [ qw( x y ) ] );
{
my $result = $template->process( [ qw( x y ) ] );
@@
-31,7
+35,7
@@
use_ok( 'URI::Template' );
# test with no values
{
# test with no values
{
- my $result = $template->process_to_string( [
] );
+ my $result = $template->process_to_string( [] );
is( $result, 'http://foo.com//', 'process w/ no values' );
}
}
is( $result, 'http://foo.com//', 'process w/ no values' );
}
}