X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=build-aux%2Fprefix-gnulib-mk;h=4d0518fa1f2bcffb9a61dd52538b52b341381ec5;hb=5191b3546cfb6c163228c23f214e325ddf60d46f;hp=7553f6542d14471061a2f03503a226f7b6920b4c;hpb=7f526ae61f715cf5d30bccc7fb7c0f091b95b0d5;p=gnulib.git

diff --git a/build-aux/prefix-gnulib-mk b/build-aux/prefix-gnulib-mk
index 7553f6542..4d0518fa1 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;
 }