summaryrefslogtreecommitdiffstats
path: root/perl-install/share/po/i18n_compssUsers
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/share/po/i18n_compssUsers')
-rw-r--r--perl-install/share/po/i18n_compssUsers4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/share/po/i18n_compssUsers b/perl-install/share/po/i18n_compssUsers
index ebdc1b81d..f6dc1ef7d 100644
--- a/perl-install/share/po/i18n_compssUsers
+++ b/perl-install/share/po/i18n_compssUsers
@@ -24,10 +24,14 @@ sub get {
@l;
}
+my @l = map { if_(/msgid "(.*)"/, $1) } cat_("DrakX.pot");
+my %l; @l{@l} = ();
+
foreach (uniq(get(''), get('.desktop'))) {
if ($_) {
s/"/\"/g;
s/\n//g;
+ next if exists $l{$_};
print qq(
#: ../../share/compssUsers:999
msgid "$_"