[pkg-perl-tools] 01/02: dpt-get-ubuntu-packages: use udd-mirror.debian.net

[gregor herrmann]

This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository pkg-perl-tools.

commit efcc14a939b0486074857f9a4402025c5bc4f6c8
Author: gregor herrmann <gregoa at debian.org>
Date:   Wed Feb 14 21:51:01 2018 +0100

    dpt-get-ubuntu-packages: use udd-mirror.debian.net
    
    instead of ssh'ing into Alioth and using udd itself.
    
    Additionally remove trailing whitespace.
---
 debian/copyright            |  1 +
 scripts/get-ubuntu-packages | 33 +++++++++++++++++----------------
 2 files changed, 18 insertions(+), 16 deletions(-)

diff --git a/debian/copyright b/debian/copyright
index 3c34e29..4cbb5e3 100644
--- a/debian/copyright
+++ b/debian/copyright
@@ -105,6 +105,7 @@ License: GPL-3+
 
 Files: scripts/get-ubuntu-packages
 Copyright: 2012, Nathan Handler <nhandler at ubuntu.com>
+ 2018, gregor herrmann <gregoa at debian.org>
 License: ISC
 
 Files: scripts/github-oauth
diff --git a/scripts/get-ubuntu-packages b/scripts/get-ubuntu-packages
index 36a0f21..849845b 100755
--- a/scripts/get-ubuntu-packages
+++ b/scripts/get-ubuntu-packages
@@ -14,32 +14,33 @@ get-ubuntu-packages - returns the list of packages which are maintained by debia
  
 =head1 DESCRIPTION
 
-This script will connect to alioth.d.o (ssh access is needed) and then query
-the list of packages from udd which are originated from the B<debian-perl team>
-and are in B<Ubuntu>.
+This script will query the list of packages from the udd database at
+udd-mirror.debian.net which are originated from the B<debian-perl team> and
+are in B<Ubuntu>.
 One package per line. Its output can later piped to other scripts like
 L<lp-mass-subscribe>.
 
 =head1 COPYRIGHT & LICENSE
 
-Nathan Handler <nhandler at ubuntu.com>                           
-                                                                               
-Permission to use, copy, modify, and/or distribute this software for any       
-purpose with or without fee is hereby granted, provided that the above         
-copyright notice and this permission notice appear in all copies.              
-                                                                               
-THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH  
-REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY    
-AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,   
-INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM    
-LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR  
-OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR         
+2012, Nathan Handler <nhandler at ubuntu.com>
+2018, gregor herrmann <gregoa at debian.org>
+
+Permission to use, copy, modify, and/or distribute this software for any
+purpose with or without fee is hereby granted, provided that the above
+copyright notice and this permission notice appear in all copies.
+
+THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
+REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
+AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
+INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
+LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
+OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 PERFORMANCE OF THIS SOFTWARE.
 
 =cut
 EOPOD
 
-ssh alioth.debian.org psql -U guest -h udd.debian.org -p 5452 -t udd << EOF
+PGPASSWORD=udd-mirror psql --host=udd-mirror.debian.net --user=udd-mirror --port 5432 --tuples-only udd << EOF
 SELECT source from ubuntu_packages
 WHERE maintainer='Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>'
 OR original_maintainer='Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>'

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/pkg-perl-tools.git