use strict;
use warnings;
-our $VERSION = '0.21';
+our $VERSION = '0.22';
use URI;
use URI::Escape ();
}
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 {