Quoting Bjørn Steensrud (bstee...@skogkatt.homelinux.org):
> 
> Package: dbconfig-common
> Severity: wishlist
> Tags:  i10n, patch
> 
> nb.po file is attached. 


There is an error in a variable (detected by the attached script,
which is not mine but was written in the past by Denis Barbier):

--- nb.po       2009-02-07 08:12:14.072748000 +0100
+++ nb2.po      2009-02-07 08:12:10.732750246 +0100
@@ -896,7 +896,7 @@
 "local user that does not exist."
 msgstr ""
 "Det ser dessverre ut til at den tilkoblingsmetoden til databasen som du har "
-"valgt for ${pkg] ikke vil virke, fordi det krever en lokal bruker som ikke "
+"valgt for ${pkg} ikke vil virke, fordi det krever en lokal bruker som ikke "
 "finnes."

 #. Type: boolean


Fixed file attached


Attachment: nb.po
Description: application/gettext

#! /usr/bin/perl

sub getVars
{
        my $text = shift;
        my $var = '';
        while ($text =~ m/\G.*?(\$\{[^{}]+\})/g) {
                $var .= $1;
        }
        return $var;
}

$/ = "\n\n";
open (PO, "< $ARGV[0]") or die "Unable to open $ARGV[0]: $!\n";
while (<PO>)
{
        s/"\n"//g;
        (my $msgid) = m/^msgid "(.*)"$/m;
        (my $msgstr) = m/^msgstr "(.*)"$/m;
        next if $msgstr eq '' || m/^#, .*fuzzy/m;
        my $var1 = getVars($msgid);
        my $var2 = getVars($msgstr);
        print if $var1 ne $var2;
}
close (PO);

Attachment: signature.asc
Description: Digital signature

Reply via email to