From 79556e1cfa147d8c9b2fc8142ed03ff067360030 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 7 Nov 1998 08:08:12 +0000 Subject: Removed depriciated FS::Bill (now in FS::cust_main) --- bin/bill | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'bin/bill') diff --git a/bin/bill b/bin/bill index 5c5be703d..ef321002b 100755 --- a/bin/bill +++ b/bin/bill @@ -76,6 +76,12 @@ # s/suidsetup/adminsuidsetup/, s/FS::Search/FS::Record/, added some batch # exporting stuff (which still needs to be generalized) and removed &idiot # ivan@sisd.com 98-may-27 +# +# $Log: bill,v $ +# Revision 1.2 1998-11-07 08:08:12 ivan +# +# Removed depriciated FS::Bill (now in FS::cust_main) +# # setup @@ -85,7 +91,6 @@ use Date::Parse; use Getopt::Std; use FS::UID qw(adminsuidsetup swapuid); use FS::Record qw(qsearch qsearchs); -use FS::Bill; my($batchfile)="/var/spool/freeside/batch"; my($batchlock)="/var/spool/freeside/batch.lock"; @@ -118,8 +123,6 @@ foreach $cust_main ( print "Billing customer #" . $cust_main->getfield('custnum') . "\n"; - bless($cust_main,"FS::Bill"); - my($error); $error=$cust_main->bill('time'=>$time); -- cgit v1.2.1 From e4ad777a6ffa5b2cc28bf26681bcfa56f83df7e9 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 7 Nov 1998 08:19:21 +0000 Subject: still need to bless into FS::cust_main (for now) --- bin/bill | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'bin/bill') diff --git a/bin/bill b/bin/bill index ef321002b..7b1e162c2 100755 --- a/bin/bill +++ b/bin/bill @@ -78,9 +78,9 @@ # ivan@sisd.com 98-may-27 # # $Log: bill,v $ -# Revision 1.2 1998-11-07 08:08:12 ivan +# Revision 1.3 1998-11-07 08:19:21 ivan # -# Removed depriciated FS::Bill (now in FS::cust_main) +# still need to bless into FS::cust_main (for now) # # setup @@ -123,6 +123,8 @@ foreach $cust_main ( print "Billing customer #" . $cust_main->getfield('custnum') . "\n"; + bless($cust_main,"FS::cust_main"); + my($error); $error=$cust_main->bill('time'=>$time); -- cgit v1.2.1 From de5bd53fdf4d115a26c1b51fefa83a114735f9bc Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 7 Nov 1998 08:21:26 +0000 Subject: missing use --- bin/bill | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'bin/bill') diff --git a/bin/bill b/bin/bill index 7b1e162c2..3bc995d35 100755 --- a/bin/bill +++ b/bin/bill @@ -78,9 +78,8 @@ # ivan@sisd.com 98-may-27 # # $Log: bill,v $ -# Revision 1.3 1998-11-07 08:19:21 ivan -# -# still need to bless into FS::cust_main (for now) +# Revision 1.4 1998-11-07 08:21:26 ivan +# missing use # # setup @@ -91,6 +90,7 @@ use Date::Parse; use Getopt::Std; use FS::UID qw(adminsuidsetup swapuid); use FS::Record qw(qsearch qsearchs); +use FS::cust_main; my($batchfile)="/var/spool/freeside/batch"; my($batchlock)="/var/spool/freeside/batch.lock"; -- cgit v1.2.1