diff -Nur -x '*.orig' -x '*.rej' smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-groups mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-groups
--- smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-groups	2006-02-09 22:19:23.000000000 -0600
+++ mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-groups	2006-10-21 23:44:29.000000000 -0500
@@ -292,7 +292,7 @@
 
 =head1 DESCRIPTION
 
-Creates or deletes groups on Mitel's SME servers (5.x/6.x).
+Creates or deletes groups on Mitel's or SME Servers (5.x/6.x/7.x).
 This tool is functionally equivalent to the 'groups' option in the server-manager, but can be run from the command line or called from an other script.
 It allows you, for example, to add a large number of accounts to a group, or delete groups on a remote machine via an ssh console.
 
diff -Nur -x '*.orig' -x '*.rej' smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-pptp mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-pptp
--- smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-pptp	2006-02-09 22:19:24.000000000 -0600
+++ mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-pptp	2006-10-21 23:53:23.000000000 -0500
@@ -78,6 +78,12 @@
                 		or die ("An error occurred while updating account '$username'.\n");
 			    last SWITCH;
 			};
+		        ($MVer=="7") && 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
@@ -96,6 +102,12 @@
                 		or die ("An error occurred while updating account '$username'.\n");
 			    last SWITCH;
 			};
+		        ($MVer=="7") && 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"; }
diff -Nur -x '*.orig' -x '*.rej' smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-users mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-users
--- smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-users	2006-02-09 22:19:27.000000000 -0600
+++ mezzanine_patched_smeserver-lazy_admin_tools-0.9.1/root/usr/sbin/lat-users	2006-10-21 23:41:10.000000000 -0500
@@ -212,8 +212,8 @@
         print "and should start with a lower-case letter.\n\a";
         return 0;
     }
-    if ( length($_[0]) > 12 ) {
-        print "The name '$_[0]' is too long. The maximum is 12 characters.\n";
+    if ( length($_[0]) > 31 ) {
+        print "The name '$_[0]' is too long. The maximum is 31 characters.\n";
         return 0;
     }
     return -1;