From 71a3746e52903b26baf7246d38bd46349a5b10cb Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sun, 3 Jun 2001 11:37:08 +0000
Subject: [PATCH] fixes

Can't locate object method "setfield" via package "svc_acct_sm" at
/usr/local/lib/perl5/site_perl/5.005/FS/Record.pm line 318
---
 FS/FS/svc_acct.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 79104b883..774b8d0ee 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -7,7 +7,7 @@ use vars qw( @ISA $nossh_hack $conf $dir_prefix @shells $usernamemin
              @saltset @pw_set);
 use Carp;
 use FS::Conf;
-use FS::Record qw( qsearchs fields );
+use FS::Record qw( qsearch qsearchs fields );
 use FS::svc_Common;
 use Net::SSH qw(ssh);
 use FS::part_svc;
@@ -536,7 +536,7 @@ sub radius_check {
 
 =head1 VERSION
 
-$Id: svc_acct.pm,v 1.15 2001-04-22 01:56:15 ivan Exp $
+$Id: svc_acct.pm,v 1.16 2001-06-03 11:37:08 ivan Exp $
 
 =head1 BUGS
 
-- 
2.11.0