X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/245d5036b6fbc2c9e4692244aff22d5188771e09..95470a2f94bfd477c0ec4ed9282a6acd26074588:/SL/Request.pm diff --git a/SL/Request.pm b/SL/Request.pm index 4479bd73a..ec479f8e4 100644 --- a/SL/Request.pm +++ b/SL/Request.pm @@ -312,7 +312,7 @@ sub flatten { for (ref $source) { /^HASH$/ && do { my $first = 1; - for my $key (keys %$source) { + for my $key (sort keys %$source) { flatten($source->{$key} => $target, (defined $prefix ? $prefix . $arr_prefix->($first) . '.' : '') . $key); $first = 0; };