From d1b164fb729f563a50f77dd8d117c8b4c70a4d26 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 3 Oct 2000 21:50:22 +0000
Subject: no_comment

---
 perl-install/share/po/i18n_compssUsers | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 perl-install/share/po/i18n_compssUsers

(limited to 'perl-install/share')

diff --git a/perl-install/share/po/i18n_compssUsers b/perl-install/share/po/i18n_compssUsers
new file mode 100644
index 000000000..c49831eff
--- /dev/null
+++ b/perl-install/share/po/i18n_compssUsers
@@ -0,0 +1,25 @@
+#!/usr/bin/perl
+
+use lib "../..";
+use pkgs;
+
+my $meta_class;
+
+local *install_any::getFile = sub {
+    open GETFILE, "../compssUsers$meta_class" and *GETFILE;
+};
+
+foreach $meta_class ('', '.desktop') {
+    my (undef, undef, undef, $descr) = pkgs::readCompssUsers([{}], [], $meta_class);
+
+    while (my ($k, $v) = each %$descr) {
+	foreach ($k, $v) {
+	    s/"/\"/g;
+	    print qq(
+#: ../../share/compssUsers$meta_class
+msgid "$_"
+msgstr ""
+);
+	}
+    }
+}
-- 
cgit v1.2.1