diff options
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 8 |
1 files changed, 8 insertions, 0 deletions
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 { |