diff options
author | Matthew Somerville <matthew@mysociety.org> | 2015-12-15 16:57:35 +0000 |
---|---|---|
committer | Matthew Somerville <matthew@mysociety.org> | 2015-12-15 16:58:43 +0000 |
commit | 41371ab59a1efa953ce5df8f46af9507a0d4e92b (patch) | |
tree | fd073f941efbd18225eab6f3c8fbaead66f6227e /t/app | |
parent | 60f9a76764341c130241d6a6e3dd445626cbefdf (diff) | |
parent | 6a70b8292bf9a84ff1095a0ce85ec0b55b49da35 (diff) |
Merge branch '1297-i18n-commas'
Diffstat (limited to 't/app')
-rw-r--r-- | t/app/01app.t | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/t/app/01app.t b/t/app/01app.t index 02ffcd217..eb98b6319 100644 --- a/t/app/01app.t +++ b/t/app/01app.t @@ -1,10 +1,27 @@ #!/usr/bin/env perl + use strict; use warnings; -use Test::More; +package FixMyStreet::Cobrand::Tester; +use parent 'FixMyStreet::Cobrand::FiksGataMi'; +sub front_stats_data { { new => 0, fixed => 0, updates => 12345 } } + +package main; + +use Test::More; use Catalyst::Test 'FixMyStreet::App'; +use charnames ':full'; +use Encode qw(encode); ok( request('/')->is_success, 'Request should succeed' ); +FixMyStreet::override_config { + ALLOWED_COBRANDS => [ 'tester' ], +}, sub { + my $page = get('/'); + my $num = encode('UTF-8', "12\N{NO-BREAK SPACE}345"); + like $page, qr/$num/; +}; + done_testing(); |