From 1662c76ecbc40f87583d776015ae9bf3a824763e Mon Sep 17 00:00:00 2001 From: expo Date: Sat, 21 Jul 2007 15:41:53 +0200 Subject: [PATCH] [svn r7804] If we can't write a file, say what the filename was! --- noinfo/make-indxal4.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/noinfo/make-indxal4.pl b/noinfo/make-indxal4.pl index b5f193182..de5cbd065 100755 --- a/noinfo/make-indxal4.pl +++ b/noinfo/make-indxal4.pl @@ -269,7 +269,7 @@ sub do_this_line { # this is considered harmful now creation of directories is versioned - DL # Open the file and start writing to it - open FILE, "> $file" or die $!; + open FILE, "> $file" or die "$!: $file"; print LOGFILE "Created $file\n"; print FILE << "END";