diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/NEWS | 2 | ||||
-rw-r--r-- | perl-install/install/NEWS | 1 | ||||
-rw-r--r-- | perl-install/lang.pm | 8 |
3 files changed, 11 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 611434e3f..cd157ddb6 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -6,6 +6,8 @@ (no timezone selection, ntp settings as advanced) - move functions to get available space from installer (to be used in draklive-install) +- localedrake: update OpenOffice/BrOffice alternative according to + selected lang (#37820) Version 10.16.1 - 18 March 2008 diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index d199a5dc0..d23bd5716 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - do not unconfigure timezone if timezone screen is canceled (#33565) +- update OpenOffice/BrOffice alternative according to selected lang (#37820) Version 10.16 - 18 March 2008 diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 272c61e6f..6e1dfbcfc 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -1209,6 +1209,14 @@ sub write { } } if !$b_dont_touch_kde_files; + + #- update alternatives for OpenOffice/BrOffice if present + foreach my $name (grep { /^oobr_bootstraprc/ } all("$::prefix/var/lib/alternatives/")) { + my $alternative = common::get_alternatives($name) or next; + my $wanted = $locale->{lang} eq 'pt_BR' ? 'bootstraprc.bro' : 'bootstraprc.ooo'; + my $path = find { basename($_) eq $wanted } map { $_->{file} } @{$alternative->{alternatives}}; + common::symlinkf_update_alternatives($name, $path) if $path; + } } sub configure_hal { |