X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fcust_main.pm;h=48c1384678d6b520406316179607783e21f4bdbf;hb=32983e39a11291178cc7ed202b8f5140f24ad8aa;hp=0b37a351e59de11c65fb351b5f5066d43bcd0b61;hpb=a2952a41f31a392ce356a299f7edf03b265ddabf;p=freeside.git

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 0b37a351e..48c138467 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1598,7 +1598,7 @@ sub all_last {
   my $dir = $FS::UID::conf_dir. "cache.". $FS::UID::datasrc;
   open(LASTCACHE,"<$dir/cust_main.last")
     or die "can't open $dir/cust_main.last: $!";
-  my @array = split(/\n/, <LASTCACHE> );
+  my @array = map chomp, <LASTCACHE>;
   close LASTCACHE;
   \@array;
 }
@@ -1611,7 +1611,7 @@ sub all_company {
   my $dir = $FS::UID::conf_dir. "cache.". $FS::UID::datasrc;
   open(COMPANYCACHE,"<$dir/cust_main.company")
     or die "can't open $dir/cust_main.last: $!";
-  my @array = split(/\n/, <COMPANYCACHE> );
+  my @array = map chomp, <COMPANYCACHE>;
   close COMPANYCACHE;
   \@array;
 }
@@ -1663,7 +1663,7 @@ sub append_fuzzyfiles {
 
 =head1 VERSION
 
-$Id: cust_main.pm,v 1.32 2001-09-11 12:10:56 ivan Exp $
+$Id: cust_main.pm,v 1.33 2001-09-20 00:10:51 ivan Exp $
 
 =head1 BUGS