r18151 - /scripts/qa/packagecheck
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Sun Mar 30 15:16:42 UTC 2008
Author: gregoa-guest
Date: Sun Mar 30 15:16:40 2008
New Revision: 18151
URL: http://svn.debian.org/wsvn/?sc=1&rev=18151
Log:
try to catch multiline conditional rmdirs
Modified:
scripts/qa/packagecheck
Modified: scripts/qa/packagecheck
URL: http://svn.debian.org/wsvn/scripts/qa/packagecheck?rev=18151&op=diff
==============================================================================
--- scripts/qa/packagecheck (original)
+++ scripts/qa/packagecheck Sun Mar 30 15:16:40 2008
@@ -183,7 +183,7 @@
DIR=$1
PKG=$(basename $(realpath $DIR))
# handle rmdir /usr/{share,lib}/perl5
- if egrep -m 1 "(rmdir.*ignore-fail-on-non-empty|rm -r.*usr/(lib|share)(/perl5)?$)" $DIR/debian/rules | grep -v "\[ \! -d" > /dev/null ; then
+ if egrep -m 1 -C 1 "(rmdir.*ignore-fail-on-non-empty|rm -r.*usr/(lib|share)(/perl5)?$)" $DIR/debian/rules | perl -pe 's/\n//g' | grep -v "\[ \! -d" > /dev/null ; then
ARCH=$(grep -m 1 -h "Architecture:" $DIR/debian/control | awk '{print $2;}')
case $ARCH in
any)
More information about the Pkg-perl-cvs-commits
mailing list