From 8ec90cfede14acdd48e6a31c32cc911404b849d5 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 1 May 2009 02:08:32 +0000
Subject: [PATCH] fix re-print/email from event page, yow.  RT#5293

---
 FS/FS/cust_event.pm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/FS/FS/cust_event.pm b/FS/FS/cust_event.pm
index 5ca816752..6df2faaa1 100644
--- a/FS/FS/cust_event.pm
+++ b/FS/FS/cust_event.pm
@@ -350,7 +350,7 @@ sub re_X {
 
   my $from = 'LEFT JOIN part_event USING ( eventpart )';
 
-              # yuck!  hardcoed *AND* sequential scans!
+              # yuck!  hardcoded *AND* sequential scans!
   my $where = " WHERE action LIKE 'cust_bill_send%'".
               "   AND cust_event._date >= $beginning".
               "   AND cust_event._date <= $ending";
@@ -367,10 +367,9 @@ sub re_X {
   my( $num, $last, $min_sec ) = (0, time, 5); #progresbar foo
   foreach my $cust_event ( @cust_event ) {
 
-    # XXX 
-    $cust_event->cust_bill->$method(
+    $cust_event->cust_X->$method(
       $cust_event->part_event->templatename
-      || $cust_event->cust_main->agent_template
+      || $cust_event->cust_X->agent_template
     );
 
     if ( $job ) { #progressbar foo
-- 
2.11.0