From: Jim Meyering Date: Sun, 27 Jan 2013 17:54:55 +0000 (-0800) Subject: prefix-gnulib-mk: give better diagnostics X-Git-Tag: v0.1~169 X-Git-Url: https://gitweb.git.savannah.gnu.org/gitweb/?a=commitdiff_plain;h=cbd4dafd96be16e8e727663decb1002883813483;p=gnulib.git prefix-gnulib-mk: give better diagnostics * build-aux/prefix-gnulib-mk: Don't just "die". Give better diagnostics upon failure. --- diff --git a/ChangeLog b/ChangeLog index 0b9f30fdc1..98d74d335f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2013-01-27 Jim Meyering + + 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 putenv: port to Solaris 10 diff --git a/build-aux/prefix-gnulib-mk b/build-aux/prefix-gnulib-mk index 7553f6542d..4d0518fa1f 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; }