From: Michael Tremer <michael.tremer@ipfire.org>
Date: Thu, 10 Jun 2021 13:55:52 +0000 (+0100)
Subject: services.cgi: Use new perl system functions
X-Git-Tag: v2.25-core158~33^2~10^2~26
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=150fadab40f740e834a28c768ceb333167e8d76e;p=ipfire-2.x.git

services.cgi: Use new perl system functions

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

diff --git a/html/cgi-bin/services.cgi b/html/cgi-bin/services.cgi
index ee4ac185a2..e25201c1cc 100644
--- a/html/cgi-bin/services.cgi
+++ b/html/cgi-bin/services.cgi
@@ -141,7 +141,7 @@ END
 	my $paramstr=$ENV{QUERY_STRING};
 	my @param=split(/!/, $paramstr);
 	if ($param[1] ne ''){
-		system("/usr/local/bin/addonctrl @param[0] @param[1] > /dev/null 2>&1");
+		&General::system("/usr/local/bin/addonctrl", "$param[0]", "$param[1]");
 	}
 
 	print <<END