projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
sha512 crypt() export
[freeside.git]
/
bin
/
sqlradius-nas.import
diff --git
a/bin/sqlradius-nas.import
b/bin/sqlradius-nas.import
index
0583272
..
1a34c8a
100755
(executable)
--- a/
bin/sqlradius-nas.import
+++ b/
bin/sqlradius-nas.import
@@
-1,7
+1,7
@@
#!/usr/bin/perl -w
use strict;
#!/usr/bin/perl -w
use strict;
-use DBI;
+use
FS::
DBI;
use FS::UID qw(adminsuidsetup); #datasrc
use FS::Record qw(qsearch qsearchs dbh);
use FS::nas;
use FS::UID qw(adminsuidsetup); #datasrc
use FS::Record qw(qsearch qsearchs dbh);
use FS::nas;
@@
-22,7
+22,7
@@
my $part_export = qsearchs('part_export', { exportnum => $exportnum })
$part_export->isa('FS::part_export::sqlradius')
or die "export $exportnum is not an sqlradius export.\n";
$part_export->isa('FS::part_export::sqlradius')
or die "export $exportnum is not an sqlradius export.\n";
-my $raddbh = DBI->connect(
+my $raddbh =
FS::
DBI->connect(
$part_export->option('datasrc'),
$part_export->option('username'),
$part_export->option('password')
$part_export->option('datasrc'),
$part_export->option('username'),
$part_export->option('password')