pull-debian-source: Modify to work for packages not in main (LP: #379822)

This commit is contained in:
Nathan Handler 2009-05-23 20:40:21 +00:00
parent 3aeb7c88b5
commit 67fec3a81a
2 changed files with 16 additions and 3 deletions

5
debian/changelog vendored
View File

@ -39,7 +39,10 @@ ubuntu-dev-tools (0.74) UNRELEASED; urgency=low
* ubuntutools/lp/functions.py:
- Simplify isLPTeamMember.
-- Nathan Handler <nhandler@ubuntu.com> Thu, 21 May 2009 03:09:42 +0000
[ Nathan Handler ]
* pull-debian-source: Modify to work for packages not in main (LP: #379822)
-- Nathan Handler <nhandler@ubuntu.com> Sat, 23 May 2009 20:34:35 +0000
ubuntu-dev-tools (0.73) karmic; urgency=low

View File

@ -88,7 +88,8 @@ sub getDSC {
if($madison=~m/^[WE]:/i) {
die("$madison");
}
my($baseURL)='http://ftp.debian.org/debian/pool/main/';
my($baseURL)='http://ftp.debian.org/debian/pool/';
my($url)=$baseURL;
my(@madison)=split(/\n/,$madison);
foreach my $line (@madison) {
my($package,$version,$release,$archs)=split(/\|/,$line,4);
@ -106,7 +107,16 @@ sub getDSC {
else {
$firstLetter=substr($package,0,1);
}
my($url)=$baseURL . $firstLetter . '/' . $package . '/' . $package . '_' . $version . '.dsc';
if($release=~m/contrib/) {
$url .= 'contrib/';
}
elsif($release=~m/non\-free/) {
$url .= 'non-free/';
}
else {
$url .= 'main/';
}
$url .= $firstLetter . '/' . $package . '/' . $package . '_' . $version . '.dsc';
return $url;
}
}