From: ivan <ivan>
Date: Wed, 7 Apr 1999 14:40:15 +0000 (+0000)
Subject: use all stuff that's qsearch'ed to avoid warnings
X-Git-Tag: freeside_1_2_0~24
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=eded85cf29342b0791f4bf18aa79b3e7f46fd999;p=freeside.git

use all stuff that's qsearch'ed to avoid warnings
---

diff --git a/site_perl/svc_acct_sm.pm b/site_perl/svc_acct_sm.pm
index b0eee114c..c757ab073 100644
--- a/site_perl/svc_acct_sm.pm
+++ b/site_perl/svc_acct_sm.pm
@@ -7,6 +7,8 @@ use FS::svc_Common;
 use FS::cust_svc;
 use FS::SSH qw(ssh);
 use FS::Conf;
+use FS::svc_acct;
+use FS::svc_domain;
 
 @ISA = qw( FS::svc_Common );
 
@@ -230,7 +232,7 @@ sub check {
 
 =head1 VERSION
 
-$Id: svc_acct_sm.pm,v 1.6 1999-01-25 12:26:16 ivan Exp $
+$Id: svc_acct_sm.pm,v 1.7 1999-04-07 14:40:15 ivan Exp $
 
 =head1 BUGS
 
diff --git a/site_perl/svc_domain.pm b/site_perl/svc_domain.pm
index 76d666b86..19aac3f88 100644
--- a/site_perl/svc_domain.pm
+++ b/site_perl/svc_domain.pm
@@ -9,9 +9,12 @@ use Mail::Internet;
 use Mail::Header;
 use Date::Format;
 use FS::Record qw(fields qsearch qsearchs);
+use FS::Conf;
 use FS::svc_Common;
 use FS::cust_svc;
-use FS::Conf;
+use FS::svc_acct;
+use FS::cust_pkg;
+use FS::cust_main;
 
 @ISA = qw( FS::svc_Common );
 
@@ -387,7 +390,7 @@ sub submit_internic {
 
 =head1 VERSION
 
-$Id: svc_domain.pm,v 1.6 1999-01-25 12:26:17 ivan Exp $
+$Id: svc_domain.pm,v 1.7 1999-04-07 14:40:15 ivan Exp $
 
 =head1 BUGS
 
@@ -423,7 +426,10 @@ ivan@sisd.com 98-jul-17-19
 pod, some FS::Conf (not complete) ivan@sisd.com 98-sep-23
 
 $Log: svc_domain.pm,v $
-Revision 1.6  1999-01-25 12:26:17  ivan
+Revision 1.7  1999-04-07 14:40:15  ivan
+use all stuff that's qsearch'ed to avoid warnings
+
+Revision 1.6  1999/01/25 12:26:17  ivan
 yet more mod_perl stuff
 
 Revision 1.5  1998/12/30 00:30:47  ivan