[devscripts] 03/07: ucan: debug msg for redirection

[Osamu Aoki]

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

osamu pushed a commit to branch multitar
in repository devscripts.

commit aba3fd86af0dd4eaa5b5e604167cadbd81fb708d
Author: Osamu Aoki <osamu at debian.org>
Date:   Thu Oct 1 00:28:09 2015 +0900

    ucan: debug msg for redirection
---
 scripts/uscan.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/scripts/uscan.pl b/scripts/uscan.pl
index 5ed6794..ce075e9 100755
--- a/scripts/uscan.pl
+++ b/scripts/uscan.pl
@@ -1,4 +1,5 @@
 #!/usr/bin/perl
+    print STDERR "$progname debug: new filename selected for download (pre-filenamemangled): $newfile_base\n" if $debug;
 # -*- tab-width: 8; indent-tabs-mode: t; cperl-indent-level: 4 -*-
 
 # uscan: This program looks for watchfiles and checks upstream ftp sites
@@ -2331,11 +2332,13 @@ sub process_watchline ($$$$$$)
 
 	# Handle sf.net addresses specially
 	if ($base =~ m%^http://sf\.net/% and ! $bare) {
+	    print STDERR "$progname debug: sf.net redirection to qa.debian.org/watch/sf.php\n" if $debug;
 	    $base =~ s%^http://sf\.net/%https://qa.debian.org/watch/sf.php/%;
 	    $filepattern .= '(?:\?.*)?';
 	}
 	# Handle pypi.python.org addresses specially
 	if ($base =~ m%^https?://pypi\.python\.org/packages/source/% and ! $bare) {
+	    print STDERR "$progname debug: pypi.python.org redirection to pypi.debian.net\n" if $debug;
 	    $base =~ s%^https?://pypi\.python\.org/packages/source/./%https://pypi.debian.net/%;
 	}
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/collab-maint/devscripts.git