summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPablo Saratxaga <pablo@mandriva.com>2000-04-22 14:00:10 +0000
committerPablo Saratxaga <pablo@mandriva.com>2000-04-22 14:00:10 +0000
commit3d05d4c73bce823fb966922770222b3549095b4f (patch)
tree1792e592a495c5dfc199ac06450b24ec378282e8 /perl-install/install_steps_interactive.pm
parente74f6370562339f831c1721451eb3ba0ba7e03b5 (diff)
downloaddrakx-backup-do-not-use-3d05d4c73bce823fb966922770222b3549095b4f.tar
drakx-backup-do-not-use-3d05d4c73bce823fb966922770222b3549095b4f.tar.gz
drakx-backup-do-not-use-3d05d4c73bce823fb966922770222b3549095b4f.tar.bz2
drakx-backup-do-not-use-3d05d4c73bce823fb966922770222b3549095b4f.tar.xz
drakx-backup-do-not-use-3d05d4c73bce823fb966922770222b3549095b4f.zip
s/Mb/MB/ in texts
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index e97c71f3f..285f77209 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -175,7 +175,7 @@ sub ask_mntpoint_s {
# @fstab = @$fstab if @fstab == 0;
die _("no available partitions") if @fstab == 0;
- my $msg = sub { "$_->{device} " . _("(%dMb)", $_->{size} / 1024 / 2) };
+ my $msg = sub { "$_->{device} " . _("(%dMB)", $_->{size} / 1024 / 2) };
if (@fstab == 1) {
$fstab[0]->{mntpoint} = '/';
@@ -944,7 +944,7 @@ _("Enable multi profiles") => { val => \$u->{profiles}, type => 'bool' },
_("Enable num lock at startup") => { val => \$u->{numlock}, type => 'bool' },
),
], complete => sub {
- !$u->{memsize} || $u->{memsize} =~ s/^(\d+)M?$/$1M/i or $o->ask_warn('', _("Give the ram size in Mb")), return 1;
+ !$u->{memsize} || $u->{memsize} =~ s/^(\d+)M?$/$1M/i or $o->ask_warn('', _("Give the ram size in MB")), return 1;
my %m = reverse %l; $ENV{SECURE_LEVEL} = $o->{security} = $m{$s};
$o->{useSupermount} && $o->{security} > 3 and $o->ask_warn('', _("Can't use supermount in high security level")), return 1;
0;