admin: distfiles/specparser.pl Die with some message.

[arekm]

Author: arekm                        Date: Tue Dec 29 09:14:51 2009 GMT
Module: admin                         Tag: HEAD
---- Log message:
Die with some message.

---- Files affected:
admin/distfiles:
   specparser.pl (1.20 -> 1.21) 

---- Diffs:

================================================================
Index: admin/distfiles/specparser.pl
diff -u admin/distfiles/specparser.pl:1.20 admin/distfiles/specparser.pl:1.21
--- admin/distfiles/specparser.pl:1.20	Sat Jul 25 16:56:49 2009
+++ admin/distfiles/specparser.pl	Tue Dec 29 10:14:46 2009
@@ -102,7 +102,7 @@
 {
 	@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 add_md5_to_print($) # {{{
 {
-	open(F, "< $_[0]") or die;
+	open(F, "< $_[0]") or die("failed opening: " . $_[0]);
 	my @sourcemap = ();
 	while (<F>) {
 		chomp;
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/cgi-bin/cvsweb.cgi/admin/distfiles/specparser.pl?r1=1.20&r2=1.21&f=u