[freeside-commits] branch FREESIDE_3_BRANCH updated. add0ce1fd73b53a51f140cf797a42825cc018fd0

[Ivan]

The branch, FREESIDE_3_BRANCH has been updated
       via  add0ce1fd73b53a51f140cf797a42825cc018fd0 (commit)
      from  713c7685a7ca6c460b4870e33b7e52a5c9070247 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit add0ce1fd73b53a51f140cf797a42825cc018fd0
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Mon Aug 14 12:48:17 2017 -0700

    add tilde to allowable punctuation, RT#77086

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index c05dac0..82974b3 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2429,7 +2429,7 @@ sub ut_moneyn {
 =item ut_text COLUMN
 
 Check/untaint text.  Alphanumerics, spaces, and the following punctuation
-symbols are currently permitted: ! @ # $ % & ( ) - + ; : ' " , . ? / = [ ] < >
+symbols are currently permitted: ! @ # $ % & ( ) - + ; : ' " , . ? / = [ ] < > ~
 May not be null.  If there is an error, returns the error, otherwise returns
 false.
 
@@ -2443,7 +2443,7 @@ sub ut_text {
   # \p{Word} = alphanumerics, marks (diacritics), and connectors
   # see perldoc perluniprops
   $self->getfield($field)
-    =~ /^([\p{Word} \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]\<\>$money_char]+)$/
+    =~ /^([\p{Word} \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/\=\[\]\<\>\~$money_char]+)$/
       or return gettext('illegal_or_empty_text'). " $field: ".
                  $self->getfield($field);
   $self->setfield($field,$1);

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/Record.pm |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)