perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From pgollu...@apache.org
Subject svn commit: r239299 - /perl/modperl/trunk/lib/Apache2/Status.pm
Date Tue, 23 Aug 2005 02:52:39 GMT
Author: pgollucci
Date: Mon Aug 22 19:52:38 2005
New Revision: 239299

URL: http://svn.apache.org/viewcvs?rev=239299&view=rev
Log:
Sort the Links alphabetically so that they show up in the same order
all the time

Modified:
    perl/modperl/trunk/lib/Apache2/Status.pm

Modified: perl/modperl/trunk/lib/Apache2/Status.pm
URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/lib/Apache2/Status.pm?rev=239299&r1=239298&r2=239299&view=diff
==============================================================================
--- perl/modperl/trunk/lib/Apache2/Status.pm (original)
+++ perl/modperl/trunk/lib/Apache2/Status.pm Mon Aug 22 19:52:38 2005
@@ -133,7 +133,7 @@
         my $uri = $r->uri;
         $r->print('<p>');
         $r->print(
-            map { qq[<a href="$uri?$_">$status{$_}</a><br>\n] } keys %status
+            map { qq[<a href="$uri?$_">$status{$_}</a><br>\n] } sort {
lc $a cmp lc $b } keys %status
         );
         $r->print('</p>');
     }



Mime
View raw message