r5856 - /scripts/qa/versioncheck-html

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Wed Jul 18 14:37:12 UTC 2007


Author: dmn
Date: Wed Jul 18 14:37:12 2007
New Revision: 5856

URL: http://svn.debian.org/wsvn/?sc=1&rev=5856
Log:
Add -html variant of versioncheck

Added:
    scripts/qa/versioncheck-html
      - copied, changed from r5855, scripts/qa/versioncheck

Copied: scripts/qa/versioncheck-html (from r5855, scripts/qa/versioncheck)
URL: http://svn.debian.org/wsvn/scripts/qa/versioncheck-html?rev=5856&op=diff
==============================================================================
--- scripts/qa/versioncheck (original)
+++ scripts/qa/versioncheck-html Wed Jul 18 14:37:12 2007
@@ -15,6 +15,11 @@
 wget -q -O- http://incoming.debian.org | html2text -nobs -width 255 > $DIR/incoming
 wget -q -O- http://ftp-master.debian.org/new.html | html2text -nobs -width 255 > $DIR/newqueue
 
+echo "<html>"
+echo "<body>"
+echo "<table>"
+echo "<tr><th>Package</th><th>Repository</th><th>Archive</th><th>Incoming</th><th>NEW</th></tr>"
+
 # loop over packages
 for SECTION in packages tools; do
 	for P in $(svn ls $REPO/$SECTION/); do
@@ -27,16 +32,21 @@
 		NE=$(grep $P $DIR/newqueue | perl -pe "s/.*$P\s+([^\s]+)\s+source.*/\1/g")
 
 		if [ "$RE" != "$PA" -a "$RE" != "$IN" -a "$RE" != "$NE" ]; then
-			echo "$P ==>"
-			echo -e "\trepository: $RE"
-			echo -e "\tpackages: $PA"
-			[ -n "$IN" ] && echo -e "\tincoming: $IN"
-			[ -n "$NE" ] && echo -e "\tnew: $NE"
+                        echo "<tr>"
+			echo "<td>$P</td>"
+			echo "<td>$RE</td>"
+			echo "<td>$PA</td>"
+			[ -n "$IN" ] && echo "<td>$IN</td>"
+			[ -n "$NE" ] && echo "<td>$NE</td>"
+                        echo "</tr>"
 		fi
 		
 	done
 done
 
+echo "</table>"
+echo "</body>"
+
 rm -rf $DIR
 
 exit 0




More information about the Pkg-perl-cvs-commits mailing list