aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Page.pm
diff options
context:
space:
mode:
authorlouise <louise>2009-09-23 09:27:51 +0000
committerlouise <louise>2009-09-23 09:27:51 +0000
commit81b01d79ed8303af1f1119e8ddac01e4d970b40d (patch)
tree3e2be3df2f0cc5129cd678556019e783e57062fc /perllib/Page.pm
parent9f149d2fb00ab93eae46188e25445a533fa0a1d1 (diff)
Adding host to the params available in header templates, renaming global vars x and y to fms_x and fms_y to reduce conflict when used in context with other js
Diffstat (limited to 'perllib/Page.pm')
-rw-r--r--perllib/Page.pm9
1 files changed, 5 insertions, 4 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm
index 2612af6a1..ffed2d2fb 100644
--- a/perllib/Page.pm
+++ b/perllib/Page.pm
@@ -6,7 +6,7 @@
# Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved.
# Email: matthew@mysociety.org; WWW: http://www.mysociety.org/
#
-# $Id: Page.pm,v 1.180 2009-09-22 16:24:13 louise Exp $
+# $Id: Page.pm,v 1.181 2009-09-23 09:27:51 louise Exp $
#
package Page;
@@ -175,8 +175,8 @@ LANG is the language the templates will be rendered in.
sub template_vars ($$){
my ($q, $lang) = @_;
my %vars;
- my $lang_url = base_url_with_lang($q, 1);
- $lang_url .= $ENV{REQUEST_URI} if $ENV{REQUEST_URI};
+ my $host = base_url_with_lang($q, 1);
+ my $lang_url .= $ENV{REQUEST_URI} if $ENV{REQUEST_URI};
%vars = (
'report' => _('Report a problem'),
'reports' => _('All reports'),
@@ -184,6 +184,7 @@ sub template_vars ($$){
'faq' => _('Help'),
'about' => _('About us'),
'site_title' => _('Report Empty Homes'),
+ 'host' => $host,
'lang_code' => $lang,
'lang' => $lang eq 'en-gb' ? 'Cymraeg' : 'English',
'lang_url' => $lang_url,
@@ -446,7 +447,7 @@ EOF
my $imgh = '254px';
$out .= <<EOF;
<script type="text/javascript">
-var x = $x - 2; var y = $y - 2;
+var fms_x = $x - 2; var fms_y = $y - 2;
var start_x = $px; var start_y = $py;
</script>
<div id="map_box">