From ad531d4c89d9e99eb51d7bced0c508a47daff198 Mon Sep 17 00:00:00 2001
From: Martin Zobel-Helas <zobel@debian.org>
Date: Sun, 18 May 2008 18:37:17 +0200
Subject: [PATCH] sort additionaly by host if $sortby != host

---
 machines.cgi | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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>";
-- 
2.20.1