[Debian-l10n-commits] r1804 - in /dl10n/trunk: Changelog dl10n-pts

Thu Jul 23 00:01:39 UTC 2009

Author: nekral-guest
Date: Thu Jul 23 00:01:26 2009
New Revision: 1804

URL: http://svn.debian.org/wsvn/?sc=1&rev=1804
Log:
	* dl10n-pts: Added section regarding errors in translations.

Modified:
    dl10n/trunk/Changelog
    dl10n/trunk/dl10n-pts

Modified: dl10n/trunk/Changelog
URL: http://svn.debian.org/wsvn/dl10n/trunk/Changelog?rev=1804&op=diff
==============================================================================

--- dl10n/trunk/Changelog (original)
+++ dl10n/trunk/Changelog Thu Jul 23 00:01:26 2009
@@ -1,3 +1,7 @@
+2009-07-22  Nicolas FranÃ§ois  <nicolas.francois at centraliens.net>
+
+	* dl10n-pts: Added section regarding errors in translations.
+
 2009-07-22  Nicolas FranÃ§ois  <nicolas.francois at centraliens.net>
 
 	* dl10n-pts: Added boolean to indicate if a todo message should be

Modified: dl10n/trunk/dl10n-pts
URL: http://svn.debian.org/wsvn/dl10n/trunk/dl10n-pts?rev=1804&op=diff
==============================================================================
--- dl10n/trunk/dl10n-pts (original)
+++ dl10n/trunk/dl10n-pts Thu Jul 23 00:01:26 2009
@@ -120,6 +120,7 @@
 my @poparts=qw(podebconf po po4a); # Only POs, no template or man
 
 my %score;
+my %errors;
 foreach my $pkg ($data->list_packages()) {
     next if defined $ignored_pkgs{$pkg};
 
@@ -150,6 +151,12 @@
             } else {
                 $score{$pkg}{'__'}{$part} = $score{$pkg}{'_'}{$part};
             }
+        }
+    }
+    if ($data->has_errors($pkg)) {
+        foreach my $line (@{$data->errors($pkg)}){
+            $errors{$pkg} = "" unless defined $errors{$pkg};
+            $errors{$pkg}.=$line
         }
     }
 }
@@ -196,6 +203,9 @@
                      and ($global_score{$pkg}{nondebian} ne "0t0f0u")));
     my $todo = 0;
     $todo = 1 if $pkg eq "shadow";
+    if (defined $errors{$pkg}) {
+        $todo = 1;
+    }
     print PKGLIST "$pkg ".
                   $data->version($pkg).
                   " (".
@@ -219,6 +229,16 @@
     <title>Translation status of package $pkg</title>
   </head>
   <body>
+EOF
+    if (defined $errors{$pkg}) {
+        print PKGSTATUS <<EOF;
+    <h1>Your package's translations have errors</h1>
+    <pre style="border-style:solid;border-width:1px">
+$errors{$pkg}
+    </pre>
+EOF
+    }
+    print PKGSTATUS <<EOF;
     <h1>Translation status of package $pkg</h1>
     <table>
       <tr><th>Language</th><th>podebconf</th><th>po</th><th>po4a</th></tr>


