e-smith-email/sme7/e-smith-email-4.16.0-RelaxedEmailCheck3.patch

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
--- 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
+++ 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
@@ -463,7 +463,7 @@
 
         return ('OK');
     }
-    elsif ($pseudonym !~ /^([a-z0-9][a-z0-9\.\-_\{!#\?~\}\$\^\+&`%\/\*]*)$/)
+    elsif ($pseudonym !~ /^([a-z0-9][a-z0-9\.\-_!#\?~\$\^\+&`%\/\*]*)$/)
     {
         return('VALID_PSEUDONYM_NAMES');
     }
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	}