summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/localedrake
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-09-06 11:29:04 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-09-06 11:29:04 +0000
commit1c131849956ed81b1eebff595d7427783560a5ab (patch)
tree2e3467ad2db5b239ab73be45a8776659fe4c575d /perl-install/standalone/localedrake
parent9d884bfa84bff3c27290d7e9014f17f17cee517c (diff)
downloaddrakx-1c131849956ed81b1eebff595d7427783560a5ab.tar
drakx-1c131849956ed81b1eebff595d7427783560a5ab.tar.gz
drakx-1c131849956ed81b1eebff595d7427783560a5ab.tar.bz2
drakx-1c131849956ed81b1eebff595d7427783560a5ab.tar.xz
drakx-1c131849956ed81b1eebff595d7427783560a5ab.zip
drop lang::write()'s prefix parameter in favor of $::prefix (which was already partially done)
Diffstat (limited to 'perl-install/standalone/localedrake')
-rw-r--r--perl-install/standalone/localedrake4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/localedrake b/perl-install/standalone/localedrake
index 2f1b22837..246499c32 100644
--- a/perl-install/standalone/localedrake
+++ b/perl-install/standalone/localedrake
@@ -24,7 +24,7 @@ if (defined $klang) {
my $locale = lang::read($>);
$klang and $locale->{lang} = $lang;
$kcountry and $locale->{country} = $country;
- lang::write('', $locale, $>, 'dont_touch_kde_files') if $apply;
+ lang::write($locale, $>, 'dont_touch_kde_files') if $apply;
#- help KDE defaulting to the right charset
print lang::charset2kde_charset(lang::l2charset($lang)), "\n";
@@ -59,7 +59,7 @@ if ($@) {
}
}
-lang::write('', $locale, $>);
+lang::write($locale, $>);
if ($>) {
if (my $wm = any::running_window_manager()) {
$in->ask_okcancel('', N("The change is done, but to be effective you must logout"), 1)