mirror of
https://git.launchpad.net/ubuntu-dev-tools
synced 2025-05-05 05:51:29 +00:00
Remove pull-revu-source
This script used a website that no longer exists. Signed-off-by: Dan Streetman <ddstreet@canonical.com>
This commit is contained in:
parent
07d7381b4d
commit
2cfcbdb300
3
debian/control
vendored
3
debian/control
vendored
@ -12,7 +12,6 @@ Build-Depends:
|
||||
devscripts (>= 2.11.0~),
|
||||
dh-python,
|
||||
distro-info (>= 0.2~),
|
||||
libwww-perl,
|
||||
lsb-release,
|
||||
python3-all,
|
||||
python3-apt,
|
||||
@ -66,7 +65,6 @@ Recommends:
|
||||
debootstrap,
|
||||
dput,
|
||||
genisoimage,
|
||||
libwww-perl,
|
||||
lintian,
|
||||
patch,
|
||||
pbuilder | cowbuilder | sbuild,
|
||||
@ -112,7 +110,6 @@ Description: useful tools for Ubuntu developers
|
||||
- pull-debian-* - same as pull-lp-* but for Debian packages.
|
||||
- pull-uca-* - same as pull-lp-* but for Ubuntu Cloud Archive packages.
|
||||
- pull-pkg - common script that provides above pull-* functionality.
|
||||
- pull-revu-source - downloads the latest source package from REVU
|
||||
- requestbackport - file a backporting request.
|
||||
- requestsync - files a sync request with Debian changelog and rationale.
|
||||
- reverse-depends - find the reverse dependencies (or build dependencies) of
|
||||
|
2
debian/copyright
vendored
2
debian/copyright
vendored
@ -105,11 +105,9 @@ Files: dch-repeat
|
||||
doc/dch-repeat.1
|
||||
doc/grep-merges.1
|
||||
doc/mk-sbuild.1
|
||||
doc/pull-revu-source.1
|
||||
doc/ubuntu-build.1
|
||||
grep-merges
|
||||
mk-sbuild
|
||||
pull-revu-source
|
||||
ubuntu-build
|
||||
ubuntutools/lp/libsupport.py
|
||||
ubuntutools/lp/lpapicache.py
|
||||
|
@ -1,27 +0,0 @@
|
||||
.TH PULL\-REVU\-SOURCE "1" "30 August 2009" "ubuntu-dev-tools"
|
||||
|
||||
.SH NAME
|
||||
pull\-revu\-source \- download a source package from REVU
|
||||
|
||||
.SH SYNOPSIS
|
||||
.B pull\-revu\-source \fR[\fB\-h\fR]\fB <\fBsource package\fR>
|
||||
|
||||
.SH DESCRIPTION
|
||||
\fBpull\-revu\-source\fR downloads and extracts the latest version of
|
||||
<\fBsource package\fR> from REVU.
|
||||
|
||||
.SH OPTIONS
|
||||
Listed below are the command line options for pull\-revu\-source:
|
||||
.TP
|
||||
.B \-h, \-\-help
|
||||
Display the usage instructions and exit.
|
||||
.TP
|
||||
.B <source package>
|
||||
This is the source package that you would like to be downloaded from Debian.
|
||||
|
||||
.SH AUTHOR
|
||||
.PP
|
||||
\fBpull\-revu\-source\fR and this manual page were written by Nathan Handler
|
||||
<nhandler@ubuntu.com>. \fBpull\-revu\-source\fR is based on \fBrevupull\fR in
|
||||
\fBkubuntu\-dev\-tools\fR, written by Harald Sitter <apachelogger@ubuntu.com>.
|
||||
Both are released under the GNU General Public License, version 3 or later.
|
@ -1,59 +0,0 @@
|
||||
#!/usr/bin/perl
|
||||
# Script Name: pull-revu-source
|
||||
# Author: Nathan Handler <nhandler@ubuntu.com>
|
||||
# Usage: pull-revu-source <source package>
|
||||
# Copyright (C) 2009 Nathan Handler <nhandler@ubuntu.com>
|
||||
# Based on revupull in kubuntu-dev-tools,
|
||||
# written by Harald Sitter <apachelogger@ubuntu.com>
|
||||
# License: GNU General Public License
|
||||
# This program is free software: you can redistribute it and/or modify
|
||||
# it under the terms of the GNU General Public License as published by
|
||||
# the Free Software Foundation, either version 3 of the License, or
|
||||
# (at your option) any later version.
|
||||
#
|
||||
# This program is distributed in the hope that it will be useful,
|
||||
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
# GNU General Public License for more details.
|
||||
# On Debian GNU/Linux systems, the complete text of the GNU General
|
||||
# Public License can be found in the /usr/share/common-licenses/GPL-3 file.
|
||||
|
||||
use warnings;
|
||||
use strict;
|
||||
use File::Basename;
|
||||
use Getopt::Long;
|
||||
|
||||
my $REVU = "revu.ubuntuwire.com";
|
||||
|
||||
my($package) = lc($ARGV[0]) || usage(2);
|
||||
my($help)=0;
|
||||
GetOptions('help' => \$help);
|
||||
usage(0) if($help);
|
||||
|
||||
eval { require LWP::Simple; };
|
||||
if ($@=~ m#^Can\'t locate LWP/Simple#) {
|
||||
print(STDERR "Please install libwww-perl.\n");
|
||||
exit(1);
|
||||
}
|
||||
use LWP::Simple;
|
||||
|
||||
dget(getURL());
|
||||
|
||||
sub getURL {
|
||||
my($url) = "http://" . $REVU . "/dsc.py?url&package=" . $package;
|
||||
my($page)=get($url);
|
||||
die("Could Not Get $url") unless (defined $page);
|
||||
return $page;
|
||||
}
|
||||
|
||||
sub dget {
|
||||
my($dsc) = @_;
|
||||
exec("dget -xu $dsc");
|
||||
}
|
||||
|
||||
sub usage {
|
||||
my($exit) = @_;
|
||||
my($name)=basename($0);
|
||||
print("USAGE: $name [-h] <source package>\n");
|
||||
exit($exit);
|
||||
}
|
Loading…
x
Reference in New Issue
Block a user