From 37a4beeb5ed32a4882caea273b6a0fe4ed5e147b Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 8 Aug 2007 19:18:37 +0000
Subject: fix otaker regex

---
 FS/FS/cust_pkg.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm
index f2b0395c6..a64d01464 100644
--- a/FS/FS/cust_pkg.pm
+++ b/FS/FS/cust_pkg.pm
@@ -422,7 +422,7 @@ sub check {
   }
 
   $self->otaker(getotaker) unless $self->otaker;
-  $self->otaker =~ /^([\w\.\-]{0,16})$/ or return "Illegal otaker";
+  $self->otaker =~ /^(\w{1,32})$/ or return "Illegal otaker";
   $self->otaker($1);
 
   if ( $self->dbdef_table->column('manual_flag') ) {
-- 
cgit v1.2.1