From 6bc74c8741448ef5c51b9896ca1855a1c2d4d6bf Mon Sep 17 00:00:00 2001
From: Daniel Berteaud <daniel@firewall-services.com>
Date: Wed, 3 Feb 2016 17:42:19 +0100
Subject: [PATCH] Call the new user-update-expire-settings when modifying a
 user

---
 .../share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm  | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm b/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
index 05fa881..a474e06 100644
--- a/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
+++ b/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/expireaccounts.pm
@@ -259,6 +259,9 @@ sub modify_user {
         }
     }
     $acct->merge_props(%new_props);
+    unless(system('/sbin/e-smith/signal-event', 'user-update-expire-settings', $acctName) == 0){
+      return $self->error('ERROR_OCCURRED');
+    }
     $self->success('USER_MODIFIED');
 }