From e8949df63ea00d5d0bf0d9763aa5d4f9de51abf7 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 3 Oct 2000 22:17:16 +0000 Subject: re-included i18n_compssUsers --- 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/po') diff --git a/perl-install/share/po/i18n_compssUsers b/perl-install/share/po/i18n_compssUsers new file mode 100644 index 000000000..d37fdf3fd --- /dev/null +++ b/perl-install/share/po/i18n_compssUsers @@ -0,0 +1,25 @@ +#!/usr/bin/perl + +use lib "../.."; +use pkgs; +use common ":common"; + + +sub get { + my ($meta_class) = @_; + local *install_any::getFile = sub { + open GETFILE, "../compssUsers$meta_class" and *GETFILE; + }; + my (undef, undef, undef, $descr) = pkgs::readCompssUsers([{}], [], $meta_class); + %$descr; +} + +foreach (uniq(get(''), get('.desktop'))) { + s/"/\"/g; + print qq( +#: ../../share/compssUsers +msgid "$_" +msgstr "" +); +} + -- cgit v1.2.1