Die with some message.

Changed files:
    specparser.pl -> 1.21

diff --git a/specparser.pl b/specparser.pl
index c8783623c5f275e1bc61427ddb23711214bf1132..9f72ca1dfd7a51e5493ed14468b6551415a81570 100644 (file)
--- a/specparser.pl
+++ b/specparser.pl
@@ -102,7 +102,7 @@ sub preparse_spec($) # {{{
 {
        @spec = ("");
 
-       open(F, "< $_[0]") or die;
+       open(F, "< $_[0]") or die("failed opening: " . $_[0]);
        while (<F>) {
                chomp;
                if (/^\s*(\%(description|package|prep|install|pre|post|files)|BuildRoot|URL)/) {
@@ -240,7 +240,7 @@ sub print_source($$$) # {{{
 
 sub add_md5_to_print($) # {{{
 {
-       open(F, "< $_[0]") or die;
+       open(F, "< $_[0]") or die("failed opening: " . $_[0]);
        my @sourcemap = ();
        while (<F>) {
                chomp;