[freeside-commits] freeside/FS/FS/Cron notify.pm,1.8.2.2,1.8.2.3
Mark Wells
mark at wavetail.420.am
Wed Sep 1 11:45:33 PDT 2010
Update of /home/cvs/cvsroot/freeside/FS/FS/Cron
In directory wavetail.420.am:/tmp/cvs-serv29291/FS/FS/Cron
Modified Files:
Tag: FREESIDE_1_9_BRANCH
notify.pm
Log Message:
packages and recurdates for impending_recur templates
Index: notify.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Cron/notify.pm,v
retrieving revision 1.8.2.2
retrieving revision 1.8.2.3
diff -u -w -d -r1.8.2.2 -r1.8.2.3
--- notify.pm 16 Aug 2010 17:50:59 -0000 1.8.2.2
+++ notify.pm 1 Sep 2010 18:45:31 -0000 1.8.2.3
@@ -4,7 +4,7 @@
use vars qw( @ISA @EXPORT_OK $DEBUG );
use Exporter;
use FS::UID qw( dbh driver_name );
-use FS::Record qw(qsearch);
+use FS::Record qw(qsearch qsearchs);
use FS::cust_main;
use FS::cust_pkg;
@@ -106,7 +106,9 @@
my $msgnum = $conf->config('impending_recur_msgnum',$cust_main->agentnum);
if ( $msgnum ) {
my $msg_template = qsearchs('msg_template', { msgnum => $msgnum });
- $error = $msg_template->send($cust_main);
+ $cust_main->setfield('packages', \\@packages);
+ $cust_main->setfield('recurdates', \\@recurdates);
+ $error = $msg_template->send('cust_main' => $cust_main);
}
else {
$error = $cust_main->notify( 'impending_recur_template',
More information about the freeside-commits
mailing list