diff -Nur smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm
--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm	2012-10-18 13:28:53.125143707 +0200
+++ smeserver-shared-folders-0.1_mod/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm	2012-10-18 13:30:01.989901252 +0200
@@ -778,7 +778,7 @@
 sub validate_name {
     my ($self, $acctName) = @_;
 
-    unless ($acctName =~ /^([a-z0-9][\_\.\-a-z0-9]*)$/){
+    unless ($acctName =~ /^([a-z0-9][\_\.\-a-z0-9]*)\$?$/){
         return $self->localise('ACCT_NAME_HAS_INVALID_CHARS',
                              {acctName => $acctName});
     }