The following commit has been merged in the master branch:
commit 98af514f0d5b9508d9855e37603f5b8360190837
Author: Raphael Geissert <atomo64@gmail.com>
Date: Wed Jan 28 00:22:17 2009 -0600
Use binary_control in checks/debhelper
Make the debhelper checks read the binary packages' fields via
Lintian::Collect::Source.
Signed-off-by: Raphael Geissert <atomo64@gmail.com>
diff --git a/checks/debhelper b/checks/debhelper
index 5ac54f4..19db213 100644
--- a/checks/debhelper
+++ b/checks/debhelper
@@ -147,16 +147,10 @@ for my $binpkg (keys %$pkgs) {
local $/;
foreach my $field (qw(pre-depends depends)) {
- if (open DEPENDS, '<', "control/$binpkg/$field") {
- chomp ($strong_depends .= <DEPENDS>);
- close(DEPENDS);
- }
+ $strong_depends .= $info->binary_field($binpkg, $field);
}
foreach my $field (qw(recommends suggests)) {
- if (open DEPENDS, '<', "control/$binpkg/$field") {
- chomp ($weak_depends .= <DEPENDS>);
- close(DEPENDS);
- }
+ $weak_depends .= $info->binary_field($binpkg, $field);
}
$depends = $weak_depends . $strong_depends;
--
Debian package checker