summaryrefslogtreecommitdiffstats
path: root/perl-install/install2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-01-07 07:26:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-01-07 07:26:05 +0000
commit4a92ef9d28a3b4241186678c3fa3b4ebd365809d (patch)
treec94e642857ca36540f5185ee786c42e7938ff625 /perl-install/install2.pm
parentbb6492e7bf3b348808cc2102c840fc91a3bff7b0 (diff)
downloaddrakx-backup-do-not-use-4a92ef9d28a3b4241186678c3fa3b4ebd365809d.tar
drakx-backup-do-not-use-4a92ef9d28a3b4241186678c3fa3b4ebd365809d.tar.gz
drakx-backup-do-not-use-4a92ef9d28a3b4241186678c3fa3b4ebd365809d.tar.bz2
drakx-backup-do-not-use-4a92ef9d28a3b4241186678c3fa3b4ebd365809d.tar.xz
drakx-backup-do-not-use-4a92ef9d28a3b4241186678c3fa3b4ebd365809d.zip
no_comment
Diffstat (limited to 'perl-install/install2.pm')
-rw-r--r--perl-install/install2.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 6c51df1c4..36afc5702 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -341,7 +341,7 @@ sub formatPartitions {
#- Do not update inode access times on this
#- file system (e.g, for faster access on the
#- news spool to speed up news servers).
- $_->{options} = "noatime" foreach grep { isExt2($_) } @{$o->{fstab}};
+ $o->{pcmcia} and $_->{options} = "noatime" foreach grep { isExt2($_) } @{$o->{fstab}};
}
#------------------------------------------------------------------------------
@@ -350,7 +350,11 @@ sub choosePackages {
$o->setPackages if $_[1] == 1;
$o->selectPackagesToUpgrade($o) if $o->{isUpgrade} && $_[1] == 1;
if ($_[1] > 1 || !$o->{isUpgrade} || $::expert) {
- do { $o->{compssUsersChoice}{$_} = 1 foreach @{$o->{compssUsersSorted}}, 'Miscellaneous' } if $_[1] == 1;
+ if ($_[1] == 1) {
+ $o->{compssUsersChoice}{$_} = 1 foreach @{$o->{compssUsersSorted}}, 'Miscellaneous';
+ $o->{compssUsersChoice}{KDE} = 0 if $o->{lang} =~ /ja|ko|th|vi|zh/; #- gnome handles much this fonts much better
+
+ }
$o->choosePackages($o->{packages}, $o->{compss},
$o->{compssUsers}, $o->{compssUsersSorted}, $_[1] == 1);
pkgs::unselect($o->{packages}, $o->{packages}{kdesu}) if $o->{packages}{kdesu} && $o->{security} > 3;