From 61641f2f42126f0a121cd9d0bdcea79f5c06852f Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 7 Oct 2011 23:13:24 +0000
Subject: better error reporting

---
 images/make_boot_img | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'images/make_boot_img')

diff --git a/images/make_boot_img b/images/make_boot_img
index c6bf57436..08adbb697 100755
--- a/images/make_boot_img
+++ b/images/make_boot_img
@@ -4,6 +4,7 @@ use Config;
 use FileHandle;
 use MDK::Common;
 use POSIX;
+use Carp;
 
 Config->import;
 my ($arch) = $Config{archname} =~ /(.*?)-/;
@@ -25,7 +26,8 @@ if ($>) {
 }
 
 sub __ { print @_, "\n"; system(@_) }
-sub _ { __ @_; $? and die }
+sub _ { __ @_; $? and croak "'" . join(' ', @_) . "failed ($?)\n" }
+
 sub mke2fs { 
     my ($f) = @_;
     _ "/sbin/mke2fs -q -m 0 -F -s 1 $f";
-- 
cgit v1.2.1