Item12180: Sort keys in debug message as this debugger expects...

git-svn-id: http://svn.foswiki.org/trunk@15861 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

core/lib/Foswiki/Configure/Feedback.pm

@@ -200,6 +200,18 @@ sub deliver {
             $pending++;
         }
     }
+    my @pendingItems = map { { item => $_->[0] } } sort {
+        my @a = @{ $a->[1] };
+        my @b = @{ $b->[1] };
+        while ( @a && @b ) {
+            my $c = shift(@a) cmp shift(@b);
+            return $c if ($c);
+        }
+        return @a <=> @b;
+      } map {
+        [ $_, [ map { s/(?:^\{)|(?:\}$)//g; $_ } split( /\}\{/, $_ ) ] ]
+      } keys %updated
+      if (DISPLAY_UNSAVED);
 
     my $pendingHtml =
       Foswiki::Configure::UI::getTemplateParser()
@@ -209,7 +221,7 @@ sub deliver {
         {
             pendingCount => $pending,
             listPending  => DISPLAY_UNSAVED,
-            pendingItems => [ map { { item => $_ } } sort keys \%updated ],
+            pendingItems => \@pendingItems,
         }
     );
     Foswiki::Configure::UI::getTemplateParser()