[freeside-commits] freeside/FS/FS msg_template.pm, 1.1.2.9, 1.1.2.10

[Mark Wells]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv21676/FS/FS

Modified Files:
      Tag: FREESIDE_1_9_BRANCH
	msg_template.pm 
Log Message:
make expdate available in new alerter templates, RT#9786

Index: msg_template.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/msg_template.pm,v
retrieving revision 1.1.2.9
retrieving revision 1.1.2.10
diff -u -w -d -r1.1.2.9 -r1.1.2.10
--- msg_template.pm	16 Aug 2010 17:50:59 -0000	1.1.2.9
+++ msg_template.pm	1 Sep 2010 17:51:33 -0000	1.1.2.10
@@ -226,7 +226,7 @@
     $_
   } @$guts;
   
-  $body = '';
+  $body = '{ use Date::Format qw(time2str); "" }';
   while(@$skin || @$guts) {
     $body .= shift(@$skin) || '';
     $body .= shift(@$guts) || '';
@@ -315,7 +315,9 @@
       cust_status ucfirst_cust_status cust_statuscolor
 
       signupdate dundate
+      expdate
       ),
+      # expdate is a special case
       [ signupdate_ymd    => sub { time2str('%Y-%m-%d', shift->signupdate) } ],
       [ dundate_ymd       => sub { time2str('%Y-%m-%d', shift->dundate) } ],
       [ paydate_my        => sub { sprintf('%02d/%04d', shift->paydate_monthyear) } ],