From 02475d1203f7ad65fd46d51cda9b835c887f986f Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 27 Mar 2005 23:21:42 +0000 Subject: [PATCH] allow & in bank names --- FS/FS/cust_main.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 4fcb22681..3728a16af 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -1024,7 +1024,7 @@ sub check { ) { $self->payname( $self->first. " ". $self->getfield('last') ); } else { - $self->payname =~ /^([\w \,\.\-\']+)$/ + $self->payname =~ /^([\w \,\.\-\'\&]+)$/ or return gettext('illegal_name'). " payname: ". $self->payname; $self->payname($1); } -- 2.11.0