From 079a77a515431e0b700d6eb328e52e132ccfd468 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 30 Jun 2004 18:12:27 +0000
Subject: [PATCH] payyment receipts: pass body has an arrayref, also fill in
 name filed

---
 FS/FS/cust_pay.pm | 21 +++++++++++----------
 1 file changed, 11 insertions(+), 10 deletions(-)

diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm
index 1932268ff..91d525a27 100644
--- a/FS/FS/cust_pay.pm
+++ b/FS/FS/cust_pay.pm
@@ -182,16 +182,17 @@ sub insert {
       'from'    => $conf->config('invoice_from'), #??? well as good as any
       'to'      => \@invoicing_list,
       'subject' => 'Payment receipt',
-      'body'    => $receipt_template->fill_in( HASH => {
-                     'date'    => time2str("%a %B %o, %Y", $self->_date),
-                     'paynum'  => $self->paynum,
-                     'paid'    => $self->paid,
-                     'payby'   => ucfirst(lc($self->payby)),
-                     'payinfo' => ( $self->payby eq 'CARD'
-                                      ? $self->payinfo_masked
-                                      : $self->payinfo        ),
-                     'balance' => $cust_main->balance,
-                   } ),
+      'body'    => [ $receipt_template->fill_in( HASH => {
+                       'date'    => time2str("%a %B %o, %Y", $self->_date),
+                       'name'    => $cust_main->name,
+                       'paynum'  => $self->paynum,
+                       'paid'    => $self->paid,
+                       'payby'   => ucfirst(lc($self->payby)),
+                       'payinfo' => ( $self->payby eq 'CARD'
+                                        ? $self->payinfo_masked
+                                        : $self->payinfo        ),
+                       'balance' => $cust_main->balance,
+                   } ) ],
     );
     if ( $error ) {
       warn "can't send payment receipt: $error";
-- 
2.11.0