-print qq!<A HREF="${p}misc/print-invoice.cgi?$invnum">Reprint this invoice</A>!.
-# "<BR><BR>(Printed $printed times)".
-#print cust_bill_events
- '<PRE>'.
+print qq!<A HREF="${p}misc/print-invoice.cgi?$invnum">Reprint this invoice</A>!. '<BR><BR>';
+
+foreach my $cust_bill_event (
+ sort { $a->_date <=> $b->_date } $cust_bill->cust_bill_event
+) {
+ print time2str("%a %b %e %T %Y", $cust_bill_event->_date). ' - '.
+ $cust_bill_event->part_bill_event->event. '<BR>';
+}
+print '<BR><PRE>';