diff options
author | ivan <ivan> | 2006-08-06 20:21:32 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-08-06 20:21:32 +0000 |
commit | 08dc9fe500cf44346e409fb8c75eda541300d64d (patch) | |
tree | f767e3eb2924407bbaaef015246ab6b0b9008bbe /FS/FS/svc_Common.pm | |
parent | ad18fd616d98b80945b455ca170ba02089723873 (diff) |
yow. fix up group handling
Diffstat (limited to 'FS/FS/svc_Common.pm')
-rw-r--r-- | FS/FS/svc_Common.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm index fdb4132c4..17942c7ec 100644 --- a/FS/FS/svc_Common.pm +++ b/FS/FS/svc_Common.pm @@ -72,7 +72,7 @@ sub new { } #empty default -sub _fieldhandlers { (); } +sub _fieldhandlers { {}; } sub virtual_fields { @@ -475,7 +475,7 @@ sub setx { my $self = shift; my $x = shift; my @x = ref($x) ? @$x : ($x); - my $coderef = scalar(@_) ? shift : {}; + my $coderef = scalar(@_) ? shift : $self->_fieldhandlers; my $error = $self->ut_numbern('svcnum') |