summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-07-20 06:23:04 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-07-20 06:23:04 +0000
commitfafa7b82d182c93045da035bd99e9c1dc6959540 (patch)
treec4ad4f47a407471de975fabf018e284287d24fdf /perl-install
parentb2a5cf0766b371562ecc68138d28e75a55f8ff46 (diff)
downloaddrakx-fafa7b82d182c93045da035bd99e9c1dc6959540.tar
drakx-fafa7b82d182c93045da035bd99e9c1dc6959540.tar.gz
drakx-fafa7b82d182c93045da035bd99e9c1dc6959540.tar.bz2
drakx-fafa7b82d182c93045da035bd99e9c1dc6959540.tar.xz
drakx-fafa7b82d182c93045da035bd99e9c1dc6959540.zip
(write) better check parameter rather than EUID
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/lang.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index e140f9be2..aa228b5f7 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -1011,7 +1011,7 @@ sub write {
setVarsInSh($prefix . ($b_user_only ? "$ENV{HOME}/.i18n" : '/etc/sysconfig/i18n'), $h);
substInFile {
s!^function lang\b.*!function lang()="$h->{LANG}"!g;
- } "$::prefix/etc/menu-methods/lang.h" if !$<;
+ } "$::prefix/etc/menu-methods/lang.h" if !$b_user_only;
eval {
my $confdir = $prefix . ($b_user_only ? "$ENV{HOME}/.kde" : '/usr') . '/share/config';