From: ivan <ivan>
Date: Wed, 13 Apr 2005 09:55:35 +0000 (+0000)
Subject: quiet annoying "use of uninitialized value errors"
X-Git-Tag: BEFORE_FINAL_MASONIZE~584
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=94bbd4b650023999262c843bca84affd71a5147d;hp=2a0fa3b220f3231fe3fae04fe0c58641911385c6

quiet annoying "use of uninitialized value errors"
---

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 2f68533c1..7526d817e 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -898,7 +898,7 @@ sub _check_duplicate {
     return 'unknown svcpart '. $self->svcpart;
   }
 
-  my $global_unique = $conf->config('global_unique-username');
+  my $global_unique = $conf->config('global_unique-username') || 'none';
 
   my @dup_user = grep { !$self->svcnum || $_->svcnum != $self->svcnum }
                  qsearch( 'svc_acct', { 'username' => $self->username } );