From 92d2bdca43914e34555385b0326780e0462dcbc3 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Mon, 23 Nov 2015 14:56:40 -0800
Subject: [PATCH] obsolete ASCII warning

---
 FS/FS/Record.pm | 1 -
 1 file changed, 1 deletion(-)

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index fafceacb5..d27a6145f 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2975,7 +2975,6 @@ May not be null.
 
 sub ut_name {
   my( $self, $field ) = @_;
-#  warn "ut_name allowed alphanumerics: +(sort grep /\w/, map { chr() } 0..255), "\n";
   $self->getfield($field) =~ /^([\p{Word} \,\.\-\']+)$/
     or return gettext('illegal_name'). " $field: ". $self->getfield($field);
   my $name = $1;
-- 
2.11.0