X-Git-Url: http://erislabs.net/gitweb/?p=liburi-template-perl.git;a=blobdiff_plain;f=lib%2FURI%2FTemplate.pm;fp=lib%2FURI%2FTemplate.pm;h=24c01f1261dcc1a4be253d32daa1f37aa5ebb56a;hp=0069457833bc5539af1935e4a55ca7442a7d5a4d;hb=bf23e788f027c454711a8421b44945acbb2443b8;hpb=4a3cf69401f1cdba7219cc23ede458c2615bbd7a diff --git a/lib/URI/Template.pm b/lib/URI/Template.pm index 0069457..24c01f1 100644 --- a/lib/URI/Template.pm +++ b/lib/URI/Template.pm @@ -3,7 +3,7 @@ package URI::Template; use strict; use warnings; -our $VERSION = '0.21'; +our $VERSION = '0.22'; use URI; use URI::Escape (); @@ -303,7 +303,8 @@ sub template { } sub variables { - return sort {$_[ 0 ]->{ _vars }->{ $a } <=> $_[ 0 ]->{ _vars }->{ $b } } keys %{ $_[ 0 ]->{ _vars } }; + my @vars = sort {$_[ 0 ]->{ _vars }->{ $a } <=> $_[ 0 ]->{ _vars }->{ $b } } keys %{ $_[ 0 ]->{ _vars } }; + return @vars; } sub expansions {