From 2e7c77052024eb60c4a61b7098b3b3f965e25b95 Mon Sep 17 00:00:00 2001
From: joeyh <joeyh>
Date: Mon, 28 May 2007 02:29:34 +0000
Subject: r2003: * Add some checks for attempts to act on packages not defined
 in the control   file.

---
 Debian/Debhelper/Dh_Lib.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'Debian')

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index c72e559f..80f56387 100644
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -656,6 +656,10 @@ sub getpackages {
 sub package_arch {
 	my $package=shift;
 	
+	if (! exists $package_arches{$package}) {
+		warning "package $package is not in control info";
+		return buildarch();
+	}
 	return $package_arches{$package} eq 'all' ? "all" : buildarch();
 }
 
@@ -663,6 +667,10 @@ sub package_arch {
 sub is_udeb {
 	my $package=shift;
 	
+	if (! exists $package_types{$package}) {
+		warning "package $package is not in control info";
+		return 0;
+	}
 	return $package_types{$package} eq 'udeb';
 }
 
-- 
cgit v1.2.3