diff options
author | Mark Wells <mark@freeside.biz> | 2016-11-16 14:08:09 -0800 |
---|---|---|
committer | Mark Wells <mark@freeside.biz> | 2016-11-16 14:08:09 -0800 |
commit | ac15bb65127bdb70398d4043a314b98eb1877fcd (patch) | |
tree | a147f479bb3efcec1e48a79eeb8aac04ad308f13 | |
parent | 7429a9a63dd734a43e50a43a2e1af5b1f99ed83a (diff) |
fix warning
-rw-r--r-- | FS/FS/Misc/Geo.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/Misc/Geo.pm b/FS/FS/Misc/Geo.pm index f5edc56..2050fdf 100644 --- a/FS/FS/Misc/Geo.pm +++ b/FS/FS/Misc/Geo.pm @@ -210,13 +210,13 @@ sub wa_sales { if ( lc($text) eq 'location code' ) { $p->get_tag('td'); # skip to the next column undef $u; - $u = $p->get_token until $u->[0] eq 'T'; # and then skip non-text + $u = $p->get_token until ($u->[0] || '') eq 'T'; # and then skip non-text $return->{'district'} = $u->[1]; } elsif ( lc($text) eq 'total tax rate' ) { $p->get_tag('td'); undef $u; - $u = $p->get_token until $u->[0] eq 'T'; + $u = $p->get_token until ($u->[0] || '') eq 'T'; $return->{'tax'} = $u->[1]; } } # get_token |