1 |
slords |
1.1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm |
2 |
|
|
--- e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2006-12-12 08:28:21.000000000 -0700 |
3 |
|
|
+++ mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/pseudonyms.pm 2006-12-12 08:26:52.000000000 -0700 |
4 |
|
|
@@ -473,7 +473,8 @@ |
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 |
|
|
} |
13 |
|
|
else { |