From 61e87a9fb56f97ae843557511ba3609f9849cc2e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sun, 18 Jul 1999 19:16:10 +0000 Subject: *** empty log message *** --- perl-install/fsedit.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fsedit.pm') diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index 8687d694c..aaef30baf 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -33,7 +33,7 @@ sub hds($$) { foreach (@$drives) { my $file = devices::make($_->{device}); - my $hd = partition_table_raw::get_geometry($file) or die "An error occurred while getting the geometry of block device $file: $!"; + my $hd = partition_table_raw::get_geometry($file) or die _("An error occurred while getting the geometry of block device %s: %s", $file, "$!"); $hd->{file} = $file; $hd->{prefix} = $hd->{device} = $_->{device}; # for RAID arrays of format c0d0p1 -- cgit v1.2.1