summaryrefslogtreecommitdiff
path: root/bin/sqlradius-norealm.reimport
diff options
context:
space:
mode:
authorMitch Jackson <mitch@freeside.biz>2019-03-03 19:42:10 -0500
committerMitch Jackson <mitch@freeside.biz>2019-03-03 19:53:52 -0500
commitd417ecbed3d356919ae80317c33a9143e20646ef (patch)
treedae9e8e397baba64f43852eedbcd8cfd3250776c /bin/sqlradius-norealm.reimport
parent863879eae9bc840432b09750eae6e552e9bbe205 (diff)
RT# 82942 Replace DBI->connect() with FS::DBI->connect()
Diffstat (limited to 'bin/sqlradius-norealm.reimport')
-rwxr-xr-xbin/sqlradius-norealm.reimport6
1 files changed, 3 insertions, 3 deletions
diff --git a/bin/sqlradius-norealm.reimport b/bin/sqlradius-norealm.reimport
index b7d0166..7ac7465 100755
--- a/bin/sqlradius-norealm.reimport
+++ b/bin/sqlradius-norealm.reimport
@@ -3,7 +3,7 @@
use strict;
use vars qw(%part_svc);
#use Date::Parse;
-use DBI;
+use FS::DBI;
use Term::Query qw(query);
use FS::UID qw(adminsuidsetup); #datasrc
use FS::Record qw(qsearch qsearchs);
@@ -53,8 +53,8 @@ print "\n\n";
###
-my $dbh = DBI->connect( $datasrc, $db_user, $db_pass )
- or die $DBI::errstr;
+my $dbh = FS::DBI->connect( $datasrc, $db_user, $db_pass )
+ or die $FS::DBI::errstr;
my $sth = $dbh->prepare('SELECT DISTINCT UserName FROM radcheck')
or die $dbh->errstr;