X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FRecord.pm;h=0df3f44270477b2e2a7beec8f06f7168451f0be7;hp=4f0984c7496e686e580911ad1d7965a7432395bc;hb=82de9040b2d99c05060be6396bab8bd74db96f6c;hpb=97bd9c0842f1799722c87de24fd0bfc69027ea65 diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index 4f0984c74..0df3f4427 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -2458,7 +2458,9 @@ May not be null. sub ut_name { my( $self, $field ) = @_; - $self->getfield($field) =~ /^([\w \,\.\-\']+)$/ +# warn "ut_name allowed alphanumerics: +(sort grep /\w/, map { chr() } 0..255), "\n"; + #$self->getfield($field) =~ /^([\w \,\.\-\']+)$/ + $self->getfield($field) =~ /^([µ_0123456789aAáÁàÀâÂåÅäÄãêæÆbBcCçÇdDðÐeEéÉèÈêÊëËfFgGhHiIíÍìÌîÎïÏjJkKlLmMnNñÑoOóÓòÒôÔöÖõÕøغpPqQrRsSßtTuUúÚùÙûÛüÜvVwWxXyYýÝÿzZþÞ \,\.\-\']+)$/ or return gettext('illegal_name'). " $field: ". $self->getfield($field); $self->setfield($field,$1); '';