diff -up smeserver-lazy_admin_tools-1.0/root/usr/sbin/lat-pptp.patch4 smeserver-lazy_admin_tools-1.0/root/usr/sbin/lat-pptp --- smeserver-lazy_admin_tools-1.0/root/usr/sbin/lat-pptp.patch4 2012-05-26 19:04:35.000000000 -0400 +++ smeserver-lazy_admin_tools-1.0/root/usr/sbin/lat-pptp 2013-06-24 20:25:45.000000000 -0400 @@ -84,6 +84,19 @@ foreach my $record (@records) or die ("An error occurred while updating account '$username'.\n"); last SWITCH; }; + ($MVer=="8") && do { + db_set_prop(\%accounts, $username, 'VPNClientAccess', "no"); + system("/sbin/e-smith/signal-event", "remoteaccess-update", $username) == 0 + or die ("An error occurred while updating account '$username'.\n"); + last SWITCH; + }; + ($MVer=="9") && do { + db_set_prop(\%accounts, $username, 'VPNClientAccess', "no"); + system("/sbin/e-smith/signal-event", "remoteaccess-update", $username) == 0 + or die ("An error occurred while updating account '$username'.\n"); + last SWITCH; + }; + } } # Activate PPTP @@ -108,6 +121,19 @@ foreach my $record (@records) or die ("An error occurred while updating account '$username'.\n"); last SWITCH; }; + ($MVer=="8") && do { + db_set_prop(\%accounts, $username, 'VPNClientAccess', "yes"); + system("/sbin/e-smith/signal-event", "remoteaccess-update", $username) == 0 + or die ("An error occurred while updating account '$username'.\n"); + last SWITCH; + }; + ($MVer=="9") && do { + db_set_prop(\%accounts, $username, 'VPNClientAccess', "yes"); + system("/sbin/e-smith/signal-event", "remoteaccess-update", $username) == 0 + or die ("An error occurred while updating account '$username'.\n"); + last SWITCH; + }; + } } else { print "Unknown argument '$fields[1]' for user $username"; }