Permalink
Browse files

Push bitcard onto the ReferrerWhitelist

We have to frob META so that Set() knows how to handle it.
This will get better in a future RT release which ships the
complete %META
  • Loading branch information...
1 parent f2c8ad3 commit f235fa3f088df81f5dc372b15e79fad83616a995 @jibsheet jibsheet committed May 6, 2012
Showing with 6 additions and 0 deletions.
  1. +6 −0 lib/RT/Authen/Bitcard.pm
View
@@ -44,6 +44,12 @@ my %RT2BC = (
);
my %BC2RT = reverse %RT2BC;
+require RT::Config;
+unless (exists $RT::Config::META{'ReferrerWhitelist'}) { # future RT versions will fix this
+ $RT::Config::META{'ReferrerWhitelist'} = { Type => 'ARRAY' };
+}
+RT->Config->Set('ReferrerWhitelist',('www.bitcard.org:443',RT->Config->Get('ReferrerWhitelist')));
+
sub Handler {
my $self = shift;

0 comments on commit f235fa3

Please sign in to comment.