Small diff against gnome-i18n/status/

["R.I.P. Deaddog" <maddog linuxhall org>]

Hi,

May I apply this patch? It allows distinguishing between outdated
translation and completely untranslated CVS module.

Abel
--- /home/maddog/cvs/CVS.GNOME.ORG/gnome-i18n/status/genhtml.pl	Sun Dec  9 15:33:11 2001
+++ genhtml.pl	Thu Feb  7 01:43:07 2002
@@ -38,6 +38,7 @@
 
 # no need to call the shell.
 
+setlocale (LC_TIME, "C");
 my $date   = strftime "%a %Y-%m-%d %T %z",localtime;
 
 ###############
@@ -599,6 +600,8 @@
 	    } else {
                 $transtatus = ("$wip{$lang}") ? "$wip{$lang}" : "$wip{$defaultlang}";
 	    }
+        } elsif (${$langmod{$mod}->{$lang}->[3]} == 2) {
+            $transtatus = ("$untranslated{$lang}") ? "<font color=\"#0033FF\">$untranslated{$lang}</font>" : "<font color=\"#0033FF\">$untranslated{$defaultlang}</font>";
         } else {
             $transtatus = ("$unknown{$lang}") ? "$unknown{$lang}" : "$unknown{$defaultlang}";
         }
--- /home/maddog/cvs/CVS.GNOME.ORG/gnome-i18n/status/status.pl	Fri Jan 25 21:55:35 2002
+++ status.pl	Thu Feb  7 01:37:01 2002
@@ -194,7 +194,7 @@
             ${$langmod{$lang}->{$mod}->[0]} = 0;
             ${$langmod{$lang}->{$mod}->[1]} = 0;
             ${$langmod{$lang}->{$mod}->[2]} = 0;
-            ${$langmod{$lang}->{$mod}->[3]} = 0;
+            ${$langmod{$lang}->{$mod}->[3]} = 2;
             ${$langmod{$lang}->{$mod}->[4]} = " ";
         }
     }
@@ -339,7 +339,7 @@
 	my $status = getstatusfromdate ($date_pot, $date_po, $ttl);
 	return ($status, $author);
     } else {
-        return (0, "");
+        return (2, "");
     }
 }