From mboxrd@z Thu Jan 1 00:00:00 1970 From: Michael Tremer To: development@lists.ipfire.org Subject: Re: [PATCH 1/4] zoneconf.cgi: Clean up HTML output Date: Tue, 17 Nov 2020 10:54:07 +0000 Message-ID: <1B49992F-E193-41B7-9153-2DBA1CF27EF3@ipfire.org> In-Reply-To: <20201117062904.1547-1-hofmann@leo-andres.de> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="===============8616614020967425262==" List-Id: --===============8616614020967425262== Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable Hello Leo, This looks like a very clean set of patches. Well done. I haven=E2=80=99t tested it, but I have seen the previous version in action. It really looks good. Best, -Michael Reviewed-by: Michael Tremer > On 17 Nov 2020, at 06:29, Leo-Andres Hofmann wrot= e: >=20 > This adds missing brackets, cleans up the indentation and removes unnecessa= ry CSS. >=20 > Signed-off-by: Leo-Andres Hofmann > --- > html/cgi-bin/zoneconf.cgi | 46 +++++++++++++++++++-------------------- > 1 file changed, 22 insertions(+), 24 deletions(-) >=20 > diff --git a/html/cgi-bin/zoneconf.cgi b/html/cgi-bin/zoneconf.cgi > index d99a3e611..067410582 100644 > --- a/html/cgi-bin/zoneconf.cgi > +++ b/html/cgi-bin/zoneconf.cgi > @@ -38,10 +38,6 @@ my $css =3D < height: 4em; > } >=20 > - tr.thin { > - height: 3em; > - } > - > td.narrow { > width: 11em; > } > @@ -85,10 +81,6 @@ my $css =3D < border-left-style: none; > } >=20 > - td.disabled { > - background-color: #cccccc; > - } > - > td.textcenter { > text-align: center; > } > @@ -312,8 +304,8 @@ if ($cgiparams{"ACTION"} eq $Lang::tr{"save"}) { > print <
> > - > - > + > END > ; >=20 > @@ -332,7 +324,7 @@ foreach (@zones) { > my $red_restricted =3D ($uc eq "RED" && ! ($red_type eq "STATIC" || $red_= type eq "DHCP")); >=20 > if ($red_restricted) { > - print ""; > + print "\t\t\n"; >=20 > next; # We're done here > } > @@ -350,7 +342,7 @@ foreach (@zones) { > } >=20 > print < - "; > +print "\t\n"; >=20 > my $slightlygrey =3D ""; >=20 > @@ -370,7 +362,8 @@ foreach (@nics) { > my $nic =3D $_->[1]; > my $wlan =3D $_->[2]; >=20 > - print ""; > + print "\t\n"; > + print "\t\t\n"; >=20 > # Iterate through all zones and check if the current NIC is assigned to it > foreach (@zones) { > @@ -393,7 +386,12 @@ foreach (@nics) { > $checked =3D "checked"; > } >=20 > - print ""; > + print < + > +END > +; > next; # We're done here > } > } > @@ -432,19 +430,19 @@ foreach (@nics) { > my $vlan_disabled =3D ($wlan) ? "disabled" : ""; >=20 > print < - > + > END > ; > } >=20 > - print ""; > + print "\t\n"; >=20 > if ($slightlygrey) { > $slightlygrey =3D ""; > --=20 > 2.27.0.windows.1 >=20 --===============8616614020967425262==--
> +
$uc ($red_type)$uc ($red_type)$uc
> +
$uc
>
$nic
$mac
$nic
$mac
> + > + > - > - > - > + > + > +