diff options
| author | louise <louise> | 2009-09-09 08:17:06 +0000 |
|---|---|---|
| committer | louise <louise> | 2009-09-09 08:17:06 +0000 |
| commit | 3690759faaac7f5bb2c3ba53a7867dabe1ffd7a1 (patch) | |
| tree | b8f479de4cb384465a7f59cdf9ed742df043699d | |
| parent | da267ca95590f26aa4352a35ca6bacfaf94fbe2b (diff) | |
Adding function for getting the cobrand from a request
| -rw-r--r-- | perllib/Page.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index 2e76488f1..8186082ef 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.171 2009-09-03 13:54:13 louise Exp $ +# $Id: Page.pm,v 1.172 2009-09-09 08:17:06 louise Exp $ # package Page; @@ -119,6 +119,14 @@ sub microsite { Memcached::set_namespace(mySociety::Config::get('BCI_DB_NAME') . ":"); } +=cut +sub get_cobrand { + my $q = shift; + my $cobrand = ''; + $cobrand = $q->{site} if $q->{site} ne 'fixmystreet'; + return $cobrand; +} + sub base_url_with_lang { my ($q, $reverse) = @_; my $host = $ENV{HTTP_HOST} || ''; |