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 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_MESSAGES, "en_US.UTF-8");
setlocale(LC_ALL, "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 $indesc = 0;
my $descr = ''; my $descr = '';
my $pkg = '';
while ( <STDIN> ) { while ( <STDIN> ) {
if ($_ =~ m/^=Ver:/ || $_ =~ m/^#/ || $_ =~ m/^=Pkg:/) { if ($_ =~ m/^=Ver:/ || $_ =~ m/^#/) {
print $_; print $_;
next; next;
} }
if ($_ =~ m/^=Pkg:\s*(\S*)\s/) {
$pkg = $1;
print $_;
next;
}
if ($_ =~ m/^=Sum:\s*(.*)\s*$/) { if ($_ =~ m/^=Sum:\s*(.*)\s*$/) {
my $sum = $1; my $sum = $1;
print "=Sum: " . gettext($sum) . "\n"; print "=Sum: " . gettext($sum) . "\n";
@ -54,6 +62,16 @@ while ( <STDIN> ) {
print gettext($descr) . "\n"; print gettext($descr) . "\n";
$descr = ''; $descr = '';
print $_; 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; next;
} }