diff options
| author | ivan <ivan> | 2010-11-02 00:28:13 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2010-11-02 00:28:13 +0000 |
| commit | 82de9040b2d99c05060be6396bab8bd74db96f6c (patch) | |
| tree | 10930aa398ae1e505ae2070829444f69d21793cc /FS | |
| parent | 97bd9c0842f1799722c87de24fd0bfc69027ea65 (diff) | |
fix for uumlaut problem, RT#10359
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/Record.pm | 4 |
1 files changed, 3 insertions, 1 deletions
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); ''; |