1 |
slords |
1.1 |
diff -uNr e-smith-email-4.16.0-orig/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm |
2 |
|
|
--- e-smith-email-4.16.0-orig/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2007-01-24 11:34:14.000000000 +0100 |
3 |
|
|
+++ e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2007-01-24 11:37:01.000000000 +0100 |
4 |
|
|
@@ -463,7 +463,7 @@ |
5 |
|
|
|
6 |
|
|
return ('OK'); |
7 |
|
|
} |
8 |
|
|
- elsif ($pseudonym !~ /^([a-z0-9][a-z0-9\.\-_\{!#\?~\}\$\^\+&`%\/\*]*)$/) |
9 |
|
|
+ elsif ($pseudonym !~ /^([a-z0-9][a-z0-9\.\-_!#\?~\$\^\+&`%\/\*]*)$/) |
10 |
|
|
{ |
11 |
|
|
return('VALID_PSEUDONYM_NAMES'); |
12 |
|
|
} |