diff options
author | Marius Halden <marius.h@lden.org> | 2015-01-26 18:58:18 +0100 |
---|---|---|
committer | Marius Halden <marius.h@lden.org> | 2015-01-26 18:58:18 +0100 |
commit | ca2b65f5c553c0f2f5f4f76a13867b8988743e39 (patch) | |
tree | 31caa587555d0b1582566001f8da6376354fdd5a | |
parent | 1c5c685d0b0904e7ddc6e764e58e8fae08632d1d (diff) |
Select language based on urlfiksgatami-nynorsk
-rw-r--r-- | perllib/FixMyStreet/Cobrand/FiksGataMi.pm | 20 |
1 files changed, 18 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm index 822a0c43b..b110b2ceb 100644 --- a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm +++ b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm @@ -6,14 +6,30 @@ use warnings; use Carp; use mySociety::MaPit; +use FixMyStreet; use FixMyStreet::Geocode::OSM; sub country { return 'NO'; } -sub languages { [ 'en-gb,English,en_GB', 'nb,Norwegian,nb_NO' ] } -sub language_override { 'nb' } +sub base_url_with_lang { + my $self = shift; + + my $base = $self->base_url; + + my $lang = $mySociety::Locale::lang; + if ($lang eq 'nn') { + $base =~ s{http://}{$&nn.}; + } else { + $base =~ s{http://}{$&nb.}; + } + + return $base +} + +sub languages { [ 'en-gb,English,en_GB', 'nb,Norwegian,nb_NO', 'nn,Norwegian,nn_NO' ] } +#sub language_override { 'nb' } sub enter_postcode_text { my ( $self ) = @_; |