diff options
author | ivan <ivan> | 2006-08-06 08:11:22 +0000 |
---|---|---|
committer | ivan <ivan> | 2006-08-06 08:11:22 +0000 |
commit | 486a0cedc8fc8010e4867516d901beb4cd631d27 (patch) | |
tree | f06dd86ea6876d24136861d30ceb68b76d465713 | |
parent | e55f806e5ba30a82c0c03dc1fc53f6e13fffb1bb (diff) |
add confession here to diagnose etxrn's problem better
-rw-r--r-- | FS/FS/svc_acct.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 572a00853..65dcf915f 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -1416,7 +1416,7 @@ Returns all RADIUS groups for this account (see L<FS::radius_usergroup>). sub radius_groups { my $self = shift; if ( $self->usergroup ) { - confess "specified usergroup is not an arrayref: ". $self->usergroup + confess "explicitly specified usergroup not an arrayref: ". $self->usergroup unless ref($self->usergroup) eq 'ARRAY'; #when provisioning records, export callback runs in svc_Common.pm before #radius_usergroup records can be inserted... |