FYI, I hit one of these diagnostics a couple of months ago,
so improved them:
>From cbd4dafd96be16e8e727663decb1002883813483 Mon Sep 17 00:00:00 2001
From: Jim Meyering <meyer...@fb.com>
Date: Sun, 27 Jan 2013 09:54:55 -0800
Subject: [PATCH] prefix-gnulib-mk: give better diagnostics
* build-aux/prefix-gnulib-mk: Don't just "die".
Give better diagnostics upon failure.
---
ChangeLog | 6 ++++++
build-aux/prefix-gnulib-mk | 5 +++--
2 files changed, 9 insertions(+), 2 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 0b9f30f..98d74d3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2013-01-27 Jim Meyering <j...@meyering.net>
+
+ prefix-gnulib-mk: give better diagnostics
+ * build-aux/prefix-gnulib-mk: Don't just "die".
+ Give better diagnostics upon failure.
+
2013-03-13 Paul Eggert <egg...@cs.ucla.edu>
putenv: port to Solaris 10
diff --git a/build-aux/prefix-gnulib-mk b/build-aux/prefix-gnulib-mk
index 7553f65..4d0518f 100755
--- a/build-aux/prefix-gnulib-mk
+++ b/build-aux/prefix-gnulib-mk
@@ -189,10 +189,11 @@ sub process ($)
{
my ($file) = @_;
my ($bak) = "$file.bak";
- rename ($file, $bak) or die;
+ rename ($file, $bak) or die "$ME: rename $file $bak failed: $!\n";
my $contents = contents ($bak);
$contents = prefix ($contents);
- my $out = new IO::File(">$file") or die;
+ my $out = new IO::File(">$file")
+ or die "$ME: $file: failed to open for writing: $!\n";
print $out $contents;
}
--
1.8.2
