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=fc9466752f05a9a897e009307dc89917562ceda3;hpb=0d7b4e5c78381a4f4cba91587225acbc359df175 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 {