Request::flatten sortiert jetzt Hashes nach keys.

[mfinanz.git] / SL / Request.pm

diff --git a/SL/Request.pm b/SL/Request.pm
index 4479bd73ae7d532a0d2672c397f2114affd15a05..ec479f8e4a719be87e7321bd8434680e18b476a5 100644 (file)
--- 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;
       };