blob: f97163c689cd462b1b5a207c783ca4f97f28a017 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
#!/usr/bin/perl
#
# FixMyStreet:Map
# Adding the ability to have different maps on FixMyStreet.
#
# Copyright (c) 2010 UK Citizens Online Democracy. All rights reserved.
# Email: matthew@mysociety.org; WWW: http://www.mysociety.org/
package FixMyStreet::Map;
use strict;
use constant TILE_WIDTH => 254;
use constant TIF_SIZE_M => 5000;
use constant TIF_SIZE_PX => 7874;
use constant SCALE_FACTOR => TIF_SIZE_M / (TIF_SIZE_PX / TILE_WIDTH);
use constant TILE_TYPE => '10k-full';
use FixMyStreet::Map::Tilma::Original;
sub display_map {
my ($q, %params) = @_;
$params{copyright} = _('© Crown copyright. All rights reserved. Ministry of Justice 100037819 2008.');
$params{watermark} = 1;
return _display_map($q, %params);
}
1;
|
