| # | Line 122 | Line 122 | sub _vartostring { | |
|---|---|---|
| 122 | my $self=shift; | |
| 123 | ||
| 124 | my $string=""; | |
| 125 | < | foreach $key ( keys %{$self->{vars}} ) { |
| 125 | > | foreach $key ( sort(keys %{$self->{vars}}) ) { |
| 126 | $string=$string.(($string eq "")?"":"\&").$key."=".$self->{vars}{$key}; | |
| 127 | } | |
| 128 | return $string; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |