X-Git-Url: http://git.ipfire.org/?a=blobdiff_plain;f=html%2Fcgi-bin%2Fp2p-block.cgi;h=04f13314244b5a1e5e42b9dc3aca8feecc729e7b;hb=415cbcecfae2330a8c4211dc4c17e8a98ee4f64b;hp=6683ca8b620d0536116c2daca7fb7345df5261b8;hpb=2a6e9ae967cd13e136cb563622236c979ba788c6;p=ipfire-2.x.git diff --git a/html/cgi-bin/p2p-block.cgi b/html/cgi-bin/p2p-block.cgi old mode 100755 new mode 100644 index 6683ca8b62..04f1331424 --- a/html/cgi-bin/p2p-block.cgi +++ b/html/cgi-bin/p2p-block.cgi @@ -84,19 +84,20 @@ open(FILE, "<$p2pfile") or die "Unable to read $p2pfile"; @p2ps = ; close FILE; -&Header::openbox('100%', 'center', $Lang::tr{'p2p block'}); +&Header::openbox('100%', 'center',); print < - - + + + END - +my $lines=0; +my $col=""; foreach my $p2pentry (sort @p2ps) { my @p2pline = split( /\;/, $p2pentry); if ($p2pline[2] eq 'on') { @@ -104,13 +105,17 @@ foreach my $p2pentry (sort @p2ps) { } else { $gif = "/images/off.gif" } - + if ($lines % 2) { + print ""; + $col="bgcolor='$color{'color20'}'"; } + else { + print ""; + $col="bgcolor='$color{'color22'}'"; } print < - - END +$lines++; } print <
$Lang::tr{'protocol'} - - + + $Lang::tr{'status'} - +
+ $p2pline[0]: +
@@ -119,9 +124,11 @@ foreach my $p2pentry (sort @p2ps) {