[SCM] Debian package checker branch, vendor-profile, updated. 2.5.1-34-g30085d6
The following commit has been merged in the vendor-profile branch:
commit c3d956c5a9a08282ae1fb8f9d9eab310f69af07a
Author: Niels Thykier <niels@thykier.net>
Date: Thu Jun 23 15:48:31 2011 +0200
Removed v_msg from FrontendUtil
diff --git a/lib/Lintian/Internal/FrontendUtil.pm b/lib/Lintian/Internal/FrontendUtil.pm
index a72b571..4e3a2b9 100644
--- a/lib/Lintian/Internal/FrontendUtil.pm
+++ b/lib/Lintian/Internal/FrontendUtil.pm
@@ -80,12 +80,10 @@ sub find_default_profile {
my $qparent;
# Use dpkg-vendor if present (unless we are testing our libdpkg-perl code)
if(check_path('dpkg-vendor') && !check_test_feature('vendor-libdpkg-perl')){
- v_msg('Using dpkg-vendor to determine the default profile.');
chomp($vendor = `dpkg-vendor --query Vendor`);
fail('dpkg-vendor failed (status: ' . ($? >> 8). ").\n") if $?;
$qparent = \&_find_parent_vendor_dpkg_vendor;
} else {
- v_msg('Using Dpkg::Vendor to determine the default profile.');
require Dpkg::Vendor;
$vendor = Dpkg::Vendor::get_current_vendor();
fail("Could not determine the current vendor.\n") unless $vendor;
@@ -94,13 +92,11 @@ sub find_default_profile {
$orig = $vendor;
while ($vendor) {
my $p;
- v_msg("Checking for default profile for $vendor.");
$p = Lintian::Profile->find_profile(lc($vendor), @prof_path);
last if $p;
$vendor = $qparent->($vendor);
}
fail("Could not find a profile for vendor $orig") unless $vendor;
- v_msg("Found default profile for vendor $orig");
return lc($vendor);
}
--
Debian package checker
Reply to: