From e288db91bff1a2ca402f1047a485a9facb0b9a2b Mon Sep 17 00:00:00 2001
From: Stefan Siegel <siegel@linux-mandrake.com>
Date: Tue, 27 Mar 2001 09:02:34 +0000
Subject: i18n group names

---
 perl-install/share/po/i18n_compssUsers | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install/share/po/i18n_compssUsers')

diff --git a/perl-install/share/po/i18n_compssUsers b/perl-install/share/po/i18n_compssUsers
index 7abe7499d..445f01209 100644
--- a/perl-install/share/po/i18n_compssUsers
+++ b/perl-install/share/po/i18n_compssUsers
@@ -11,7 +11,9 @@ sub get {
     open F, "../compssUsers$meta_class" or return; #die "can't open file ../compssUsers$meta_class";
     foreach (<F>) {
 	/^\s*$/ || /^#/ and next;
-	s/#.*//;
+	# i18n the Group names:
+	s/#.*!{--- }//;
+	s/[ ]*# --- //;
 
 	if (/^(\S.*)/) {
 	    my ($icon, $descr);
-- 
cgit v1.2.1