diff options
| author | Struan Donald <struan@exo.org.uk> | 2011-06-07 18:01:18 +0100 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2011-06-07 18:01:18 +0100 |
| commit | db5da038ea3a3264b4bae2490dbd877cba2ecab0 (patch) | |
| tree | 561f6d2ea01ba93f968d5124a2f95714376fb194 /perllib/Problems.pm | |
| parent | 673a2879a74d0d71c4d3be0b9c7ee567cf72b219 (diff) | |
| parent | f128b19cf7bf0da5dd445dc39d1a09e8953fc32d (diff) | |
Merge branch 'migrate_to_catalyst' of ssh://git.mysociety.org/data/git/public/fixmystreet into migrate_to_catalyst
Diffstat (limited to 'perllib/Problems.pm')
| -rw-r--r-- | perllib/Problems.pm | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/perllib/Problems.pm b/perllib/Problems.pm index b742932c1..c1430b540 100644 --- a/perllib/Problems.pm +++ b/perllib/Problems.pm @@ -27,19 +27,6 @@ sub site_restriction { return $site_restriction_hash; } -sub set_site_restriction { - my $q = shift; - my $site = $q->{site}; - if ($site ne 'fixmystreet'){ - my $cobrand = Page::get_cobrand($q); - my $cobrand_data = Cobrand::extra_data($cobrand, $q); - ($site_restriction, $site_key) = Cobrand::site_restriction($cobrand, $cobrand_data); - } else { - $site_restriction = ''; - $site_key = 0; - } -} - # Set the site restrictions using the new cobrand style - no need to special # case 'fixmystreet' as default cobrand takes care of that. sub set_site_restriction_with_cobrand_object { |