r39384 - /scripts/qa/packagecheck

[gregoa at users.alioth.debian.org]

Author: gregoa
Date: Sun Jul  5 15:13:45 2009
New Revision: 39384

URL: http://svn.debian.org/wsvn/?sc=1&rev=39384
Log:
-W (the watch file handling function) now also tries to remove developer versions from debian/watch

Modified:
    scripts/qa/packagecheck

Modified: scripts/qa/packagecheck
URL: http://svn.debian.org/wsvn/scripts/qa/packagecheck?rev=39384&op=diff
==============================================================================
--- scripts/qa/packagecheck (original)
+++ scripts/qa/packagecheck Sun Jul  5 15:13:45 2009
@@ -1,6 +1,6 @@
 #!/bin/bash
 
-# Copyright 2007, 2008 gregor herrmann <gregoa at debian.org>
+# Copyright 2007, 2008, 2009 gregor herrmann <gregoa at debian.org>
 # Copyright 2007, 2008 Damyan Ivanov <dmn at debian.org>
 # Copyright 2007 David Paleino <d.paleino at gmail.com>
 # Released under the terms of the GNU GPL version 2
@@ -34,7 +34,8 @@
 	echo "             Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>"
 	echo "  -D       - debian/control: add \${misc:Depends} to Depends:"
 	echo "  -W       - debian/_w_atch: change CPAN URLs to"
-	echo "             http://search.cpan.org/dist/Mod-Ule/"
+	echo "             http://search.cpan.org/dist/Mod-Ule/ ;"
+	echo "             update to ignore developer releases"
 	echo "  -C       - if -W is given, create debian/watch if it does not"
 	echo "             exist"
 	echo "  -R       - debian/rules: _r_mdir /usr/\{lib,share\}/perl5"
@@ -214,6 +215,11 @@
 			MSG_WATCH="debian/watch: use dist-based URL."
 			CHANGED=1
 		fi
+	elif [ -e $DIR/debian/watch ] && egrep -q "(d_\.|d\._)" $DIR/debian/watch && ! egrep -q "uversionmangle.+_.\." $DIR/debian/watch; then
+		echo "$PKG: trying to remove developer versions from debian/watch"
+		sed -i -e 's;\(d_\.\|d\._\);d.;' $DIR/debian/watch
+		MSG_WATCH="debian/watch: update to ignore development releases."
+		CHANGED=1
 	elif [ ! -e $DIR/debian/watch ] && [ -n "$CREATE_WATCH" ]; then
 		echo "$PKG: creating debian/watch"
 		if dist_name=`detect_dist $DIR`; then