pool/package-translations
SHA256
4
0
Fork 1
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Accepting request 89637 from system:install:head

Browse Source 
- insert EULAs into the suse tags

OBS-URL: https://build.opensuse.org/request/show/89637
OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/package-translations?expand=0&rev=23
This commit is contained in:
Stephan Kulow 2011-10-28 17:41:01 +00:00 committed by Git OBS Bridge
commit d6b25f505c
2 changed files with 25 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
package-translations.changes
View File

@ -1,3 +1,8 @@
-------------------------------------------------------------------
Fri Oct 28 08:53:01 UTC 2011 - coolo@suse.com
- insert EULAs into the suse tags
-------------------------------------------------------------------
Thu Oct 27 13:46:34 CEST 2011 - coolo@suse.com

22
translate_packages.pl
View File

@ -26,16 +26,24 @@ $ENV{'LC_ALL'} = 'en_US.UTF-8';
setlocale(LC_MESSAGES, "en_US.UTF-8");
setlocale(LC_ALL, "en_US.UTF-8");
textdomain("package-translations-" . $ARGV[0]);
my $lang = $ARGV[0];
textdomain("package-translations-$lang");
my $indesc = 0;
my $descr = '';
my $pkg = '';
while ( <STDIN> ) {
if ($_ =~ m/^=Ver:/ || $_ =~ m/^#/ || $_ =~ m/^=Pkg:/) {
if ($_ =~ m/^=Ver:/ || $_ =~ m/^#/) {
print $_;
next;
}
if ($_ =~ m/^=Pkg:\s*(\S*)\s/) {
$pkg = $1;
print $_;
next;
}
if ($_ =~ m/^=Sum:\s*(.*)\s*$/) {
my $sum = $1;
print "=Sum: " . gettext($sum) . "\n";
@ -54,6 +62,16 @@ while ( <STDIN> ) {
print gettext($descr) . "\n";
$descr = '';
print $_;
if (-f "/usr/share/doc/packages/eulas/$pkg.$lang") {
print "+Eul:\n";
open(EULA, "/usr/share/doc/packages/eulas/$pkg.$lang");
while ( <EULA> ) {
print $_;
}
close(EULA);
print "-Eul:\n";
}
next;
}