diff options
author | ivan <ivan> | 2001-09-20 00:13:07 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-09-20 00:13:07 +0000 |
commit | bb5702532b602019ca68c7b15f630cd1109192d4 (patch) | |
tree | dd508d56f6765a077d9490abe0bb3c93f52b19c9 | |
parent | 32983e39a11291178cc7ed202b8f5140f24ad8aa (diff) |
really fix fuzzy searching
-rw-r--r-- | FS/FS/cust_main.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 48c138467..8b9dedb26 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 = map chomp, <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 = map chomp, <COMPANYCACHE>; + my @array = map { chomp; $_; } <COMPANYCACHE>; close COMPANYCACHE; \@array; } @@ -1663,7 +1663,7 @@ sub append_fuzzyfiles { =head1 VERSION -$Id: cust_main.pm,v 1.33 2001-09-20 00:10:51 ivan Exp $ +$Id: cust_main.pm,v 1.34 2001-09-20 00:13:07 ivan Exp $ =head1 BUGS |