From: jeff <jeff>
Date: Fri, 13 Aug 2010 05:51:25 +0000 (+0000)
Subject: make ut_textn analogous to ut_text
X-Git-Tag: TORRUS_1_0_9~404
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=bdfbb5a929adcaa493d046145bec6d6914e9611b

make ut_textn analogous to ut_text
---

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 758e0f96c..ab4ea2a5b 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2178,11 +2178,8 @@ May be null.  If there is an error, returns the error, otherwise returns false.
 
 sub ut_textn {
   my($self,$field)=@_;
-  $self->getfield($field)
-    =~ /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]]*)$/
-      or return gettext('illegal_text'). " $field: ". $self->getfield($field);
-  $self->setfield($field,$1);
-  '';
+  return $self->setfield($field, '') if $self-getfield($field) =~ /^$/;
+  $self->ut_text($field);
 }
 
 =item ut_alpha COLUMN