X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FCommonCode.pm;h=296878549671f13d478e2272882c35dbd6c46454;hb=a6b39cb5eec2cf7d8a0d756f0090a9d8644443c9;hp=b33f7b472f58c571338d1c4adf3b9c70d98d69e4;hpb=10d8edcaa0572ec395661ad18fd84f60e1a7b510;p=deb%2Fpackages.git

diff --git a/lib/Packages/CommonCode.pm b/lib/Packages/CommonCode.pm
index b33f7b4..2968785 100644
--- a/lib/Packages/CommonCode.pm
+++ b/lib/Packages/CommonCode.pm
@@ -49,7 +49,8 @@ sub parse_control_par {
 sub activate {
     my ($file) = @_;
 
-    rename("${file}.new", $file);
+    rename("${file}.new", $file)
+    	or die "rename ${file}.new $file failed: $!\n";
 }
 
 sub activate_dir {