[freeside-commits] branch master updated. 7f30c88ec340acb697c4dad7582945e25d4b5d0f

[Ivan]

The branch, master has been updated
       via  7f30c88ec340acb697c4dad7582945e25d4b5d0f (commit)
      from  0b0412671da80d8c619e5f5a9b04c5bbf8aa39a4 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 7f30c88ec340acb697c4dad7582945e25d4b5d0f
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Sun Feb 22 15:02:48 2015 -0800

    fix disappearing first names, fallout from #32223

diff --git a/FS/FS/Template_Mixin.pm b/FS/FS/Template_Mixin.pm
index fe484a4..606c6c8 100644
--- a/FS/FS/Template_Mixin.pm
+++ b/FS/FS/Template_Mixin.pm
@@ -7,7 +7,7 @@ use vars qw( $DEBUG $me
            );
              # but NOT $conf
 use vars qw( $invoice_lines @buf ); #yuck
-use List::Util qw(sum first);
+use List::Util qw(sum); #can't import first, it conflicts with cust_main.first
 use Date::Format;
 use Date::Language;
 use Text::Template 1.20;
@@ -1213,7 +1213,8 @@ sub print_generic {
 
   # create a tax section if we don't yet have one
   my $tax_description = 'Taxes, Surcharges, and Fees';
-  my $tax_section = first { $_->{description} eq $tax_description } @sections;
+  my $tax_section =
+    List::Util::first { $_->{description} eq $tax_description } @sections;
   if (!$tax_section) {
     $tax_section = { 'description' => $tax_description };
     push @sections, $tax_section if $multisection;

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/Template_Mixin.pm |    5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)