From af95fac84cf207a536ef88eaa2c882cbf41adaa0 Mon Sep 17 00:00:00 2001
From: Marco Rodrigues <gothicx@gmail.com>
Date: Mon, 27 Sep 2010 22:45:19 +0100
Subject: [PATCH] Show message when a package isn't in Debian testing

---
 debian/changelog   | 5 +++++
 pull-debian-source | 4 ++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index b0b8b1a..37dab8b 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,9 +1,14 @@
 ubuntu-dev-tools (0.105) UNRELEASED; urgency=low
 
+  [ Siegfried-Angel Gevatter Pujals ]
   * pbuilder-dist, doc/pbuilder-dist.1:
      - Export the distribution and architecture information to the environment
        so that it is available in pbuilderrc, etc. (LP: #628933).
 
+  [ Marco Rodrigues ]
+  * pull-debian-source:
+     - Show message when a package isn't in Debian testing (LP: #529041).
+
  -- Siegfried-Angel Gevatter Pujals <rainct@ubuntu.com>  Sun, 26 Sep 2010 17:36:59 +0200
 
 ubuntu-dev-tools (0.104) experimental; urgency=low
diff --git a/pull-debian-source b/pull-debian-source
index 840e7a6..0ea360c 100755
--- a/pull-debian-source
+++ b/pull-debian-source
@@ -26,6 +26,7 @@ use AptPkg::Version;
 
 die("Please install 'devscripts'\n") if(! grep -x "$_/dget", split(':',$ENV{'PATH'}));
 
+my($name)=basename($0);
 my($package)=$ARGV[0] || &usage();
 my($help)=0;
 GetOptions('help' => \$help);
@@ -81,7 +82,7 @@ sub getMadison {
 	my($url)=shift || die("No URL Passed to getMadison: $!\n");
 	chomp $url;
 	my($madison)=get($url);
-	die("Could Not Get $url") unless (defined $madison && $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") unless ($release=~m/testing/ && $madison!~m/^\s*$/);
 	return $madison;
 }
 sub getDSC {
@@ -131,7 +132,6 @@ sub getDSC {
 
 }
 sub usage {
-	my($name)=basename($0);
 	die("USAGE: $name [-h] <source package> [target release]\n");
 }
 sub invalidRelease {