r5652 - /scripts/qa/wnppcheck
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Fri Jun 22 20:50:23 UTC 2007
Author: gregoa-guest
Date: Fri Jun 22 20:50:23 2007
New Revision: 5652
URL: http://svn.debian.org/wsvn/?sc=1&rev=5652
Log:
fix output of wnppcheck
Modified:
scripts/qa/wnppcheck
Modified: scripts/qa/wnppcheck
URL: http://svn.debian.org/wsvn/scripts/qa/wnppcheck?rev=5652&op=diff
==============================================================================
--- scripts/qa/wnppcheck (original)
+++ scripts/qa/wnppcheck Fri Jun 22 20:50:23 2007
@@ -5,14 +5,13 @@
URL="http://bugs.debian.org/cgi-bin/pkgreport.cgi?which=pkg&data=wnpp&archive=no&show_list_header=no&show_list_footer=no&version=&dist=unstable&pend-inc=pending&pend-exc=forwarded&pend-exc=pending-fixed&pend-exc=fixed&pend-exc=done&exclude=wontfix"
-echo "<html><h1>WNPP bugs wrt lib*-perl</h1><pre>" > $TARGET
+echo "<html><h1>WNPP bugs wrt lib*-perl</h1><pre>"
wget -q -O - "$URL" | \
sed -e '/H2.*Forwarded/,$ d' | \
html2text -nobs -width 255 | \
egrep -A 1 "\#.+lib.+-perl" | \
sed -e 's/_/ /g' -e '/^--$/ d' | \
- sed -e 's;#\([0-9]\+\);<a href="http://bugs.debian.org/\1">#\1</a>;g' \
- >> $TARGET
+ sed -e 's;#\([0-9]\+\);<a href="http://bugs.debian.org/\1">#\1</a>;g'
echo "</pre></html>"
exit 0
More information about the Pkg-perl-cvs-commits
mailing list