aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorlouise <louise>2009-09-28 16:26:55 +0000
committerlouise <louise>2009-09-28 16:26:55 +0000
commit453be5eb776148333cd77a19a65200968dd5e178 (patch)
tree9215eab386a7e7c7883acfa77fd4237912515069
parent9ecbe326440956f81b414cf28fd61b67e2da35c9 (diff)
Remove extra params from pin url
-rw-r--r--perllib/Page.pm13
1 files changed, 11 insertions, 2 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm
index ac1caa303..f9312fb78 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.187 2009-09-28 12:57:03 louise Exp $
+# $Id: Page.pm,v 1.188 2009-09-28 16:26:55 louise Exp $
#
package Page;
@@ -492,7 +492,16 @@ sub display_pin {
. $num . '.gif" alt="' . _('Problem') . '" style="top:' . ($py-59)
. 'px; left:' . ($px) . 'px; position: absolute;">';
return $out unless $_ && $_->{id} && $col ne 'blue';
- my $url = NewURL($q, -retain => 1, -url => '/report/' . $_->{id}, pc => undef);
+ my $url = NewURL($q, -retain => 1,
+ -url => '/report/' . $_->{id},
+ pc => undef,
+ x => undef,
+ y => undef,
+ sx => undef,
+ sy => undef,
+ all_pins => undef,
+ no_pins => undef
+);
$out = '<a title="' . ent($_->{title}) . '" href="' . $url . '">' . $out . '</a>';
return $out;
}