From 443b7c91c9bd5716a626afcc834bec1ad10c8c71 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 5 Nov 2002 19:54:26 +0000 Subject: (format_ext2): better error message when it is called from format_ext3 (thanks to Brian Murrell) --- perl-install/fs.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl-install/fs.pm b/perl-install/fs.pm index 560d1f7cf..57e1cfb26 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -545,6 +545,7 @@ sub format_ext2($@) { $dev =~ m,(rd|ida|cciss)/, and push @options, qw(-b 4096 -R stride=16); #- For RAID only. push @options, qw(-b 1024 -O none) if arch() =~ /alpha/; run_program::run('mke2fs', '-F', @options, devices::make($dev)) or die _("%s formatting of %s failed", "ext2", $dev); + run_program::run('mke2fs', '-F', @options, devices::make($dev)) or die _("%s formatting of %s failed", grep { $_ eq '-j' } @options ? "ext3" : "ext2", $dev); } sub format_ext3 { my ($dev, @options) = @_; -- cgit v1.2.1