diff options
| author | Pablo Saratxaga <pablo@mandriva.com> | 2000-04-22 14:00:10 +0000 |
|---|---|---|
| committer | Pablo Saratxaga <pablo@mandriva.com> | 2000-04-22 14:00:10 +0000 |
| commit | 3d05d4c73bce823fb966922770222b3549095b4f (patch) | |
| tree | 1792e592a495c5dfc199ac06450b24ec378282e8 /perl-install | |
| parent | e74f6370562339f831c1721451eb3ba0ba7e03b5 (diff) | |
| download | drakx-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')
| -rw-r--r-- | perl-install/ChangeLog | 5 | ||||
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/perl-install/ChangeLog b/perl-install/ChangeLog index d3a731d5a..969619dc3 100644 --- a/perl-install/ChangeLog +++ b/perl-install/ChangeLog @@ -1,3 +1,8 @@ +2000-04-22 Pablo Saratxaga <pablo@madrakesoft.com> + + * install_steps_interactive.pm: s/Mb/MB/ as 'b' is symbol for bit + and not for byte. RAM is expressed in megabytes -> MB + 2000-04-19 François Pons <fpons@mandrakesoft.com> * install_steps_interactive.pm: fixed crazy mutli CD manipulation. 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; |