X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Fradiator.pm;h=669e3d41c8c9be8028e4f13f3972386cc4fa3108;hb=1a320aa8f679a355bd3678ccceb5d7ecf7b0aeba;hp=f09d36abbb0405fca6f94c05a54965061ab11e54;hpb=0af38652da3b3be7da2d35b048285ef6f2194e1a;p=freeside.git diff --git a/FS/FS/part_export/radiator.pm b/FS/FS/part_export/radiator.pm index f09d36abb..669e3d41c 100644 --- a/FS/FS/part_export/radiator.pm +++ b/FS/FS/part_export/radiator.pm @@ -3,6 +3,7 @@ package FS::part_export::radiator; use vars qw(@ISA %info $radusers); use Tie::IxHash; use FS::part_export::sqlradius; +use FS::DBI; tie my %options, 'Tie::IxHash', %FS::part_export::sqlradius::options; @@ -163,7 +164,7 @@ sub radiator_delete { #subroutine, not method sub radiator_connect { #my($datasrc, $username, $password) = @_; #DBI->connect($datasrc, $username, $password) or die $DBI::errstr; - DBI->connect(@_) or die $DBI::errstr; + FS::DBI->connect(@_) or die $FS::DBI::errstr; } 1;