From mboxrd@z Thu Jan  1 00:00:00 1970
From: Bernhard Bitsch <Bernhard.Bitsch@gmx.de>
To: development@lists.ipfire.org
Subject: [PATCH] Fix for bug #12050
Date: Fri, 24 May 2019 15:43:59 +0200
Message-ID:
 <trinity-36f502c3-84a2-474b-ba7f-3a0d2b4a8c82-1558705439610@3c-app-gmx-bs42>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="===============3434950584062944540=="
List-Id: <development.lists.ipfire.org>

--===============3434950584062944540==
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: quoted-printable

Save fixed leases to file after addition of a new lease

Signed-off-by: Bernhard Bitsch <bbitsch(a)ipfire.org>

---
 html/cgi-bin/dhcp.cgi | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/html/cgi-bin/dhcp.cgi b/html/cgi-bin/dhcp.cgi
index 675d80012..19c55eb6d 100644
--- a/html/cgi-bin/dhcp.cgi
+++ b/html/cgi-bin/dhcp.cgi
@@ -443,6 +443,9 @@ if ($dhcpsettings{'ACTION'} eq $Lang::tr{'add'}.'2') {
 	$dhcpsettings{'FIX_ROOTPATH'} =3D &Header::cleanhtml($dhcpsettings{'FIX_ROO=
TPATH'});
 	if ($dhcpsettings{'KEY2'} eq '') { #add or edit ?
 	    unshift (@current2, "$dhcpsettings{'FIX_MAC'},$dhcpsettings{'FIX_ADDR'}=
,$dhcpsettings{'FIX_ENABLED'},$dhcpsettings{'FIX_NEXTADDR'},$dhcpsettings{'FI=
X_FILENAME'},$dhcpsettings{'FIX_ROOTPATH'},$dhcpsettings{'FIX_REMARK'}\n");
+	    open(FILE, ">$filename2") or die 'Unable to open fixed lease file.';
+	    print FILE @current2;
+	    close(FILE);
 	    &General::log($Lang::tr{'fixed ip lease added'});

 	    # Enter edit mode
--
2.21.0.windows.1


--===============3434950584062944540==--