diff options
Diffstat (limited to 'perllib/FixMyStreet/Cobrand/Default.pm')
| -rw-r--r-- | perllib/FixMyStreet/Cobrand/Default.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Cobrand/Default.pm b/perllib/FixMyStreet/Cobrand/Default.pm index 14f8f6ba3..097ce3ef7 100644 --- a/perllib/FixMyStreet/Cobrand/Default.pm +++ b/perllib/FixMyStreet/Cobrand/Default.pm @@ -56,7 +56,8 @@ sub is_default { =head2 fake_q - $fake_q = $cobrand->fake_q; + $fake_q = $cobrand->fake_q; + $new_fake_q = $cobrand->fake_q($new_fake_q); Often the cobrand needs access to the request so we add it at the start by passing it to ->new. If the request has not been set and you call this (or a @@ -67,6 +68,8 @@ use a request-related method out of a request-context. sub fake_q { my $self = shift; + $self->{fake_q} = shift if @_; + return $self->{fake_q} || croak "No fake_q has been set" . " - should you be calling this method outside of a web request?"; |