Skip to content

Commit

Permalink
Goddamnit OFCOM!
Browse files Browse the repository at this point in the history
  • Loading branch information
DrHyde committed Jun 13, 2023
1 parent 1e5ecce commit 85ed113
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 2 deletions.
1 change: 1 addition & 0 deletions build-data.uk
Original file line number Diff line number Diff line change
Expand Up @@ -61,6 +61,7 @@ foreach my $xlsfile (File::Find::Rule->name('*.xlsx')->in('data-files')) {
my $status_field =
exists($header_fields_index_by_name{'Status'}) ? 'Status' :
exists($header_fields_index_by_name{'Block Status'}) ? 'Block Status' :
exists($header_fields_index_by_name{'Block Status '}) ? 'Block Status ' :
exists($header_fields_index_by_name{'Block Status Formula'}) ? 'Block Status Formula' :
die("Can't find a status field in $xlsfile\n");

Expand Down
4 changes: 2 additions & 2 deletions t/inc/uk_tests.pl
Original file line number Diff line number Diff line change
Expand Up @@ -93,8 +93,8 @@
ok($number->is_pager(), "pagers correctly identified");

# see https://github.com/DrHyde/perl-modules-Number-Phone/issues/112
# checked on 2022-12-24
# next check due 2023-06-01 (semi-annually)
# checked on 2023-06-13
# next check due 2023-12-01 (semi-annually)
subtest "0800 716 range has the wrong length, OFCOM says 10 digits but 0800 716 598 is diallable" => sub {
$number = Number::Phone->new('+44800716598'); # used by Barclays
isa_ok(
Expand Down

0 comments on commit 85ed113

Please sign in to comment.