duration formatting (h:mm:ss)

We have a couple of hosts which take a long time to backup.  When I look 
at the host summary page, I'm always trying to do the math to convert 
minutes to hours in the duration column.  Here's a patch which converts 
the duration to hours:minutes:seconds.

I also patched the language files to remove the /mins.  I think it's 
intuitive enough to not need a /h:mm:ss label, but since a lot of the 
other columns are labeled, maybe it's best to add one for consistency.

-Marc
Index: lib/BackupPC/CGI/HostInfo.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/CGI/HostInfo.pm,v
retrieving revision 1.10
diff -u -r1.10 HostInfo.pm
--- lib/BackupPC/CGI/HostInfo.pm        20 Jun 2004 02:21:02 -0000      1.10
+++ lib/BackupPC/CGI/HostInfo.pm        31 Aug 2004 16:15:19 -0000
@@ -86,7 +86,7 @@
             my $startTime = timeStamp2($Archives[$i]{startTime});
             my $dur       = $Archives[$i]{endTime} - $Archives[$i]{startTime};
             $dur          = 1 if ( $dur <= 0 );
-            my $duration  = sprintf("%.1f", $dur / 60);
+            my $duration  = sprintf("%d:%0.2d:%0.2d", int($dur/60/60), ($dur / 
60) % 60, ($dur % 60));
             my $Archives_Result = $Lang->{failed};
             if ($Archives[$i]{result} ne "failed") { $Archives_Result = 
$Lang->{success}; }
             $ArchiveStr  .= <<EOF;
@@ -128,7 +128,7 @@
         my $startTime = timeStamp2($Backups[$i]{startTime});
         my $dur       = $Backups[$i]{endTime} - $Backups[$i]{startTime};
         $dur          = 1 if ( $dur <= 0 );
-        my $duration  = sprintf("%.1f", $dur / 60);
+        my $duration  = sprintf("%d:%0.2d:%0.2d", int($dur/60/60), ($dur / 60) 
% 60, ($dur % 60));
         my $MB        = sprintf("%.1f", $Backups[$i]{size} / (1024*1024));
         my $MBperSec  = sprintf("%.2f", $Backups[$i]{size} / (1024*1024*$dur));
         my $MBExist   = sprintf("%.1f", $Backups[$i]{sizeExist} / (1024*1024));
@@ -207,7 +207,7 @@
         my $startTime = timeStamp2($Restores[$i]{startTime});
         my $dur       = $Restores[$i]{endTime} - $Restores[$i]{startTime};
         $dur          = 1 if ( $dur <= 0 );
-        my $duration  = sprintf("%.1f", $dur / 60);
+        my $duration  = sprintf("%d:%0.2d:%0.2d", int($dur/60/60), ($dur / 60) 
% 60, ($dur % 60));
         my $MB        = sprintf("%.1f", $Restores[$i]{size} / (1024*1024));
         my $MBperSec  = sprintf("%.2f", $Restores[$i]{size} / 
(1024*1024*$dur));
         my $Restores_Result = $Lang->{failed};
Index: lib/BackupPC/Lang/de.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/de.pm,v
retrieving revision 1.17
diff -u -r1.17 de.pm
--- lib/BackupPC/Lang/de.pm     20 Jun 2004 02:21:02 -0000      1.17
+++ lib/BackupPC/Lang/de.pm     31 Aug 2004 16:15:19 -0000
@@ -641,7 +641,7 @@
     <td align="center"> Typ </td>
     <td align="center"> Filled </td>
     <td align="center"> Start Zeitpunkt </td>
-    <td align="center"> Dauer/min </td>
+    <td align="center"> Dauer </td>
     <td align="center"> Alter/Tage </td>
     <td align="center"> Server Backup Pfad </td>
 </tr>
Index: lib/BackupPC/Lang/en.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/en.pm,v
retrieving revision 1.29
diff -u -r1.29 en.pm
--- lib/BackupPC/Lang/en.pm     20 Jun 2004 02:21:02 -0000      1.29
+++ lib/BackupPC/Lang/en.pm     31 Aug 2004 16:15:19 -0000
@@ -634,7 +634,7 @@
     <td align="center"> Type </td>
     <td align="center"> Filled </td>
     <td align="center"> Start Date </td>
-    <td align="center"> Duration/mins </td>
+    <td align="center"> Duration </td>
     <td align="center"> Age/days </td>
     <td align="center"> Server Backup Path </td>
 </tr>
Index: lib/BackupPC/Lang/es.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/es.pm,v
retrieving revision 1.16
diff -u -r1.16 es.pm
--- lib/BackupPC/Lang/es.pm     20 Jun 2004 02:21:02 -0000      1.16
+++ lib/BackupPC/Lang/es.pm     31 Aug 2004 16:15:19 -0000
@@ -634,7 +634,7 @@
     <td align="center"> Tipo </td>
     <td align="center"> Completo </td>
     <td align="center"> Fecha Inicio </td>
-    <td align="center"> Duracion/mn </td>
+    <td align="center"> Duracion </td>
     <td align="center"> Antigüedad/dias </td>
     <td align="center"> Ruta a la Copia en el Servidor </td>
 </tr>
Index: lib/BackupPC/Lang/fr.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/fr.pm,v
retrieving revision 1.32
diff -u -r1.32 fr.pm
--- lib/BackupPC/Lang/fr.pm     20 Jun 2004 02:21:02 -0000      1.32
+++ lib/BackupPC/Lang/fr.pm     31 Aug 2004 16:15:19 -0000
@@ -632,7 +632,7 @@
     <td align="center"> Type </td>
     <td align="center"> Fusionnée </td> 
     <td align="center"> Date de démarrage </td>
-    <td align="center"> Durée/mins </td>
+    <td align="center"> Durée </td>
     <td align="center"> Âge/jours </td>
     <td align="center"> Chemin d\'accès de la sauvegarde sur le serveur </td>
 </tr>
Index: lib/BackupPC/Lang/it.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/it.pm,v
retrieving revision 1.9
diff -u -r1.9 it.pm
--- lib/BackupPC/Lang/it.pm     20 Jun 2004 02:21:02 -0000      1.9
+++ lib/BackupPC/Lang/it.pm     31 Aug 2004 16:15:19 -0000
@@ -642,7 +642,7 @@
     <td align="center"> Tipo </td>
     <td align="center"> Completo </td>
     <td align="center"> Data avvio </td>
-    <td align="center"> Durata (minuti) </td>
+    <td align="center"> Durata </td>
     <td align="center"> Et&agrave; (giorni) </td>
     <td align="center"> Percorso backup server </td>
 </tr>
Index: lib/BackupPC/Lang/nl.pm
===================================================================
RCS file: /cvsroot/backuppc/BackupPC/lib/BackupPC/Lang/nl.pm,v
retrieving revision 1.4
diff -u -r1.4 nl.pm
--- lib/BackupPC/Lang/nl.pm     20 Jun 2004 02:21:02 -0000      1.4
+++ lib/BackupPC/Lang/nl.pm     31 Aug 2004 16:15:20 -0000
@@ -634,7 +634,7 @@
     <td align="center"> Type </td>
     <td align="center"> Aangevuld </td>
     <td align="center"> Startdatum </td>
-    <td align="center"> Duurtijd in min. </td>
+    <td align="center"> Duurtijd </td>
     <td align="center"> Lftd. in dagen </td>
     <td align="center"> Plaats op de server </td>
 </tr>