added in_use usr preference handling

16 years ago · cd015a2bd5
parent 8172e25e34
commit cd015a2bd5
2 changed files with 6 additions and 1 deletions
--- a/lib/admin/Controller/subscriber.pm
+++ b/lib/admin/Controller/subscriber.pm
@ -681,6 +681,10 @@ sub update_preferences : Local {

    $$preferences{mct} = $c->request->params->{mct} ? 1 : undef;

+    ### subscriber activation flag ###
+
+    $$preferences{in_use} = $c->request->params->{in_use} ? 1 : undef;
+
    ### save settings ###

    unless(keys %messages) {
--- a/root/tt/subscriber_detail.tt
+++ b/root/tt/subscriber_detail.tt
@ -236,7 +236,8 @@
                      || preference.key == "cfb"
                      || preference.key == "cft"
                      || preference.key == "cfna"
-                      || preference.key == "mct" %]
+                      || preference.key == "mct"
+                      || preference.key == "in_use" %]
                <tr>
                  <td class="tdkey">[% preference.key %]:</td>
                  <td>