From 34102f4b67eecf1d2b047f4eb54526dd7764f9e4 Mon Sep 17 00:00:00 2001
From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Sat, 9 Feb 2008 20:08:33 +0100
Subject: [PATCH] Packages::CommonCode::activate(): Die on error

---
 lib/Packages/CommonCode.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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 {
-- 
2.39.2