captive: Remember selected coupon expiry time

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

diff --git a/html/cgi-bin/captive.cgi b/html/cgi-bin/captive.cgi
index 46c12fd2444e623709e8fb8fdae54586bed0cebc..b15d1d37e325a28f47e8ce5bb9d526a436e5181c 100755 (executable)
--- a/html/cgi-bin/captive.cgi
+++ b/html/cgi-bin/captive.cgi
@@ -135,6 +135,12 @@ if ($cgiparams{'ACTION'} eq "$Lang::tr{'Captive generate coupon'}") {
        }
 
        if (!$errormessage) {
+               # Remember selected values
+               foreach my $val (("UNLIMITED", "EXP_HOUR", "EXP_DAY", "EXP_WEEK", "EXP_MONTH")) {
+                       $settings{$val} = $cgiparams{$val};
+               }
+               &General::writehash($settingsfile, \%settings);
+
                &General::readhasharray($coupons, \%couponhash) if (-e $coupons);
                my $now = time();