proxy.cgi: Remove using legacy network functions

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>

diff --git a/html/cgi-bin/proxy.cgi b/html/cgi-bin/proxy.cgi
index 1f2d0ce7b930ec8cf792db95dd52bae3a15af3a6..837f9c6832634a01bc20a2c167e6cfdedb595e7c 100644 (file)
--- a/html/cgi-bin/proxy.cgi
+++ b/html/cgi-bin/proxy.cgi
@@ -168,12 +168,12 @@ my $HAVE_NTLM_AUTH = (-e "/usr/bin/ntlm_auth");
 
 my $green_cidr = "";
 if (&Header::green_used() && $netsettings{'GREEN_DEV'}) {
-       $green_cidr = &General::ipcidr("$netsettings{'GREEN_NETADDRESS'}\/$netsettings{'GREEN_NETMASK'}");
+       $green_cidr = &Network::normalize_network("$netsettings{'GREEN_NETADDRESS'}\/$netsettings{'GREEN_NETMASK'}");
 }
 
 my $blue_cidr = "";
 if (&Header::blue_used() && $netsettings{'BLUE_DEV'}) {
-       $blue_cidr = &General::ipcidr("$netsettings{'BLUE_NETADDRESS'}\/$netsettings{'BLUE_NETMASK'}");
+       $blue_cidr = &Network::normalize_network("$netsettings{'BLUE_NETADDRESS'}\/$netsettings{'BLUE_NETMASK'}");
 }
 
 &Header::showhttpheaders();