From 3fbf212dd74829c7ca32ec2e4edcffd1aa6e6467 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 8 Sep 2003 11:48:33 +0000
Subject: use formatError to have the error message instead of SCALAR(0x....)

---
 perl-install/standalone/diskdrake | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/standalone/diskdrake b/perl-install/standalone/diskdrake
index ef5326c81..5498fcab8 100755
--- a/perl-install/standalone/diskdrake
+++ b/perl-install/standalone/diskdrake
@@ -71,7 +71,7 @@ if ($type eq 'fileshare') {
 
 my $all_hds = fsedit::get_hds({}, $in);
 
-$SIG{__DIE__} = sub { my $m = chomp_($_[0]); log::l("ERROR: $m") };
+$SIG{__DIE__} = sub { my $m = formatError($_[0]); log::l("ERROR: $m") };
 
 fs::get_raw_hds('', $all_hds);
 
-- 
cgit v1.2.1