X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fsvc_acct.pm;h=c50dfd540cad6a792f1f981ad7ddee8c9857af36;hb=08dc9fe500cf44346e409fb8c75eda541300d64d;hp=c4dbb00c989bbad13746052e5f800c3c3d0bbf9a;hpb=936038efe0b75ad037619167f62db7fe16c25255;p=freeside.git

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index c4dbb00c9..c50dfd540 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -189,17 +189,19 @@ Creates a new account.  To add the account to the database, see L<"insert">.
 sub table { 'svc_acct'; }
 
 sub _fieldhandlers {
-  #false laziness with edit/svc_acct.cgi
-  'usergroup' => sub { 
-                       my $usergroup = shift;
-                       if ( ref($usergroup) eq 'ARRAY' ) {
-                         $usergroup;
-                       } elsif ( length($usergroup) ) {
-                         [ split(/\s*,\s*/, $usergroup) ];
-                       } else {
-                         [];
-                       }
-                     },
+  {
+    #false laziness with edit/svc_acct.cgi
+    'usergroup' => sub { 
+                         my( $self, $groups ) = @_;
+                         if ( ref($groups) eq 'ARRAY' ) {
+                           $groups;
+                         } elsif ( length($groups) ) {
+                           [ split(/\s*,\s*/, $groups) ];
+                         } else {
+                           [];
+                         }
+                       },
+  };
 }
 
 =item insert [ , OPTION => VALUE ... ]
@@ -701,7 +703,7 @@ sub check {
 
   my($recref) = $self->hashref;
 
-  my $x = $self->setfixed;
+  my $x = $self->setfixed( $self->_fieldhandlers );
   return $x unless ref($x);
   my $part_svc = $x;