[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