From d55ea2647f2382735f96398a4ac5709aba957746 Mon Sep 17 00:00:00 2001 From: Michael Bienia Date: Sun, 21 Nov 2010 14:48:22 +0100 Subject: [PATCH] pull-debian-source: Fix logical error in abort check (lp: #678072). --- debian/changelog | 5 ++++- pull-debian-source | 4 ++-- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/debian/changelog b/debian/changelog index 31cde8c..cfc4fa2 100644 --- a/debian/changelog +++ b/debian/changelog @@ -7,7 +7,10 @@ ubuntu-dev-tools (0.106) UNRELEASED; urgency=low * sponsor-patch: Call dpkg-source with --no-preparation to not apply patches if the packages uses the 3.0 (quilt) format. - -- Benjamin Drung Sat, 20 Nov 2010 22:03:07 +0100 + [ Michael Bienia ] + * pull-debian-source: Fix logical error in abort check (lp: #678072). + + -- Michael Bienia Sun, 21 Nov 2010 14:46:12 +0100 ubuntu-dev-tools (0.105) experimental; urgency=low diff --git a/pull-debian-source b/pull-debian-source index 0ea360c..b8fdbf7 100755 --- a/pull-debian-source +++ b/pull-debian-source @@ -74,7 +74,7 @@ sub getURL{ $package=lc($package); $package=~s/\+/%2b/g; $release=lc($release); - my($baseURL)='http://qa.debian.org/madison.php?text=on'; + my($baseURL)='http://qa.debian.org/madison.php?text=on&a=source'; my($url)=$baseURL . '&package=' . $package . '&s=' . $release; return $url; } @@ -82,7 +82,7 @@ sub getMadison { my($url)=shift || die("No URL Passed to getMadison: $!\n"); chomp $url; my($madison)=get($url); - die("The source package $package isn't available in Debian testing.\nRun $name $package unstable if the package has not yet migrated from Debian unstable to Debian testing.\n") unless ($release=~m/testing/ && $madison!~m/^\s*$/); + die("The source package $package isn't available in Debian testing.\nRun $name $package unstable if the package has not yet migrated from Debian unstable to Debian testing.\n") if ($release=~m/testing/ && $madison=~m/^\s*$/); return $madison; } sub getDSC {