updated Spanish file,

fixed script building pom files so that it look on both DrakX.pot and
libDrakX.pot for the compssusers strings

1 files changed, 5 insertions, 2 deletions

diff --git a/po/get_from_compssusers.pl b/po/get_from_compssusers.pl
index 1ad5c86c..5923cdcf 100755
--- a/po/get_from_compssusers.pl
+++ b/po/get_from_compssusers.pl
@@ -7,8 +7,10 @@ our @exceptions = qw(Development Configuration Mail);
 
 my $po = $ARGV[0];
 my $drakxfile = "../../../gi/perl-install/install/share/po/$po";
+my $libdrakxfile = "../../../gi/perl-install/share/po/$po";
 
 -e $drakxfile or exit 0;
+-e $libdrakxfile or exit 0;
 
 my ($enc_rpmdrake) = cat_($po) =~ /Content-Type: .*; charset=(.*)\\n/i;
 my ($enc_drakx)    = cat_($drakxfile) =~ /Content-Type: .*; charset=(.*)\\n/;
@@ -16,7 +18,8 @@ uc($enc_rpmdrake) ne uc($enc_drakx) and die "Encodings differ for $po! rpmdrake'
 
 our $current;
 our $entry;
-foreach my $line (cat_($drakxfile)) {
+foreach my $line (cat_($drakxfile, $libdrakxfile)) {
+#foreach my $line (cat_($drakxfile)) {
     $line =~ m|^\Q#: share/compssUsers.pl:| || ($line =~ m|^msgid "([^"]+)"| && member($1, @miss)) and do {
 	$current = 'inside';
         $entry = "# DO NOT BOTHER TO MODIFY HERE, BUT IN DRAKX PO\n";
@@ -28,4 +31,4 @@ foreach my $line (cat_($drakxfile)) {
 	$current = 'outside';
         print $entry;
     };
-}
+};