r7941 - /scripts/qa/packagecheck

[gregoa-guest at users.alioth.debian.org]

Author: gregoa-guest
Date: Tue Sep 25 18:49:25 2007
New Revision: 7941

URL: http://svn.debian.org/wsvn/?sc=1&rev=7941
Log:
add trailing slash only to URLs constructed from modules names and not generally (i.e. not for URL taken from the old Homepage pseudo-field in Description

Modified:
    scripts/qa/packagecheck

Modified: scripts/qa/packagecheck
URL: http://svn.debian.org/wsvn/scripts/qa/packagecheck?rev=7941&op=diff
==============================================================================
--- scripts/qa/packagecheck (original)
+++ scripts/qa/packagecheck Tue Sep 25 18:49:25 2007
@@ -73,13 +73,13 @@
 			PERLNAME=$(perl -n -e "print if s;^name:.* ([a-zA-Z0-9:_-]+).*\$;\$1;" trunk/$p/META.yml | head -n 1)
 		fi
 		if [ -n "$PERLNAME" ]; then
-			NEWHP="http://search.cpan.org/dist/$PERLNAME"
+			NEWHP="http://search.cpan.org/dist/$PERLNAME/"
 		fi
 		
 		# get NEWHP from somewhere else? debian/watch? debian/copyright?
 
 		if [ -n "$NEWHP" ]; then
-			perl -pi -e "s;(Standards-Version:.+);\$1\nHomepage: $NEWHP/;" trunk/$p/debian/control
+			perl -pi -e "s;(Standards-Version:.+);\$1\nHomepage: $NEWHP;" trunk/$p/debian/control
 			dch --changelog trunk/$p/debian/changelog "Add missing Homepage field to source stanza in debian/control."
 			CHANGED=1
 		fi