aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@mysociety.org>2010-12-22 16:38:37 +0000
committerMatthew Somerville <matthew@mysociety.org>2010-12-22 16:38:37 +0000
commita1f9b9d2422f4b14f79ed40fbd70f18510dfedf2 (patch)
treec675a4d916d684fde8085fda4c3a53ceb75b7166 /perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm
parent74a45e725dc529af5dc8a677153f65588d6f8a2a (diff)
parent7acf747fe181d2e63499e80f235dc1a4ecd5098e (diff)
Merge branch 'master' into cities_release_1
Diffstat (limited to 'perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm')
-rw-r--r--perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm27
1 files changed, 27 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm b/perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm
new file mode 100644
index 000000000..103f4c15c
--- /dev/null
+++ b/perllib/FixMyStreet/Map/Tilma/Original/StreetView.pm
@@ -0,0 +1,27 @@
+#!/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 => 250;
+use constant TIF_SIZE_M => 5000;
+use constant TIF_SIZE_PX => 5000;
+use constant SCALE_FACTOR => TIF_SIZE_M / (TIF_SIZE_PX / TILE_WIDTH);
+use constant TILE_TYPE => 'streetview';
+
+use FixMyStreet::Map::Tilma::Original;
+
+sub display_map {
+ my ($q, %params) = @_;
+ $params{copyright} = _('Map contains Ordnance Survey data &copy; Crown copyright and database right 2010.');
+ return _display_map($q, %params);
+}
+
+1;