smeserver-shared-folders/contribs8/smeserver-shared-folders-0.1-name_ending_with_dollar.patch

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});
     }
1	unnilennium	1.1	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
2			--- smeserver-shared-folders-0.1/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/shares.pm 2012-10-18 13:28:53.125143707 +0200
3			+++ 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
4			@@ -778,7 +778,7 @@
5			sub validate_name {
6			my ($self, $acctName) = @_;
7
8			- unless ($acctName =~ /^([a-z0-9][\_\.\-a-z0-9]*)$/){
9			+ unless ($acctName =~ /^([a-z0-9][\_\.\-a-z0-9]*)\$?$/){
10			return $self->localise('ACCT_NAME_HAS_INVALID_CHARS',
11			{acctName => $acctName});
12			}