summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2016-11-16 14:08:09 -0800
committerMark Wells <mark@freeside.biz>2016-11-16 14:08:09 -0800
commitac15bb65127bdb70398d4043a314b98eb1877fcd (patch)
treea147f479bb3efcec1e48a79eeb8aac04ad308f13
parent7429a9a63dd734a43e50a43a2e1af5b1f99ed83a (diff)
fix warning
-rw-r--r--FS/FS/Misc/Geo.pm4
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