Imported Upstream version 0.22
[liburi-template-perl.git] / lib / URI / Template.pm
index 0069457..24c01f1 100644 (file)
@@ -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 {