From: Martin Zobel-Helas <zobel@debian.org>
Date: Sun, 18 May 2008 16:37:17 +0000 (+0200)
Subject: sort additionaly by host if $sortby != host
X-Git-Tag: release-0.3.33~69^2~1
X-Git-Url: https://git.adam-barratt.org.uk/?p=mirror%2Fuserdir-ldap-cgi.git;a=commitdiff_plain;h=ad531d4c89d9e99eb51d7bced0c508a47daff198

sort additionaly by host if $sortby != host
---

diff --git a/machines.cgi b/machines.cgi
index 34d622a..166c2ca 100755
--- a/machines.cgi
+++ b/machines.cgi
@@ -197,9 +197,9 @@ if ($output{havehostdata}) {
   
   my @sorted;
   if ($sortorder eq "asc") {
-     @sorted = sort {$summary{$a}->{$sortby} cmp $summary{$b}->{$sortby}} keys(%summary);
+     @sorted = sort {($summary{$a}->{$sortby} cmp $summary{$b}->{$sortby}) || ($summary{$a}->{'host'} cmp $summary{$b}->{'host'})} keys(%summary)
   } else {
-     @sorted = sort {$summary{$b}->{$sortby} cmp $summary{$a}->{$sortby}} keys(%summary);
+     @sorted = sort {($summary{$b}->{$sortby} cmp $summary{$a}->{$sortby}) || ($summary{$a}->{'host'} cmp $summary{$b}->{'host'})} keys(%summary)
   }
   foreach $host (@sorted) {
     $hostdetails .= "<tr>";