r13487 - /scripts/qa/packagecheck
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Thu Jan 24 21:26:46 UTC 2008
Author: gregoa-guest
Date: Thu Jan 24 21:26:46 2008
New Revision: 13487
URL: http://svn.debian.org/wsvn/?sc=1&rev=13487
Log:
escape @ in Uploaders: email before feeding it to perl
Modified:
scripts/qa/packagecheck
Modified: scripts/qa/packagecheck
URL: http://svn.debian.org/wsvn/scripts/qa/packagecheck?rev=13487&op=diff
==============================================================================
--- scripts/qa/packagecheck (original)
+++ scripts/qa/packagecheck Thu Jan 24 21:26:46 2008
@@ -121,9 +121,9 @@
# TODO: remove DPG from Uploaders if we've added it to Maintainer
if ! echo $OLDMAINT | grep pkg-perl-maintainers ; then
if grep Uploaders $TRUNK/$1/debian/control > /dev/null; then
- perl -pi -e "s;(Uploaders:.+);\$1, $OLDMAINT;" $TRUNK/$1/debian/control
+ perl -pi -e "s;(Uploaders:.+);\$1, ${OLDMAINT/@/\@};" $TRUNK/$1/debian/control
else
- perl -pi -e "s;(Maintainer:.+);\$1\nUploaders: $OLDMAINT;" $TRUNK/$1/debian/control
+ perl -pi -e "s;(Maintainer:.+);\$1\nUploaders: ${OLDMAINT/@/\@};" $TRUNK/$1/debian/control
fi
MSG_CONTROL_CH="${MSG_CONTROL_CH:+$MSG_CONTROL_CH; }$OLDMAINT moved to Uploaders"
fi
More information about the Pkg-perl-cvs-commits
mailing list