diff options
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index b4b6f75e7..2cce2ee31 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -954,7 +954,7 @@ sub getHds { my $all_hds = catch_cdie { fsedit::hds(\@drives, $flags) } sub { $ok = 0; - my $err = $@; $err =~ s/ at (.*?)$//; + my $err = formatError($@); log::l("error reading partition table: $err"); !$flags->{readonly} && $f_err and $f_err->($err); }; |