summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/lang.pm')
-rw-r--r--perl-install/lang.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index b7becb3d2..0241c6953 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -4,7 +4,6 @@ use diagnostics;
use strict;
use common;
use log;
-use URPM;
#- key: lang name (locale name for some (~5) special cases needing
#- extra distinctions)
@@ -923,7 +922,6 @@ sub utf8_should_be_needed {
sub pack_langs {
my ($l) = @_;
my $s = $l->{all} ? 'all' : join ':', uniq(map { getLANGUAGE($_) } langs($l));
- URPM::add_macro("_install_langs $s");
$s;
}
@@ -961,6 +959,8 @@ sub write_langs {
my ($langs) = @_;
my $s = pack_langs($langs);
symlink "$::prefix/etc/rpm", "/etc/rpm" if $::prefix;
+ require URPM;
+ URPM::add_macro("_install_langs $s");
substInFile { s/%_install_langs.*//; $_ .= "%_install_langs $s\n" if eof && $s } "$::prefix/etc/rpm/macros";
}