Add an access token authentication credential.

This allows access if you have a token associated with your user.

1 files changed, 13 insertions, 0 deletions

diff --git a/perllib/FixMyStreet/App.pm b/perllib/FixMyStreet/App.pm
index 1eb197e38..e47336b7c 100644
--- a/perllib/FixMyStreet/App.pm
+++ b/perllib/FixMyStreet/App.pm
@@ -81,6 +81,19 @@ __PACKAGE__->config(
                 user_model => 'DB::User',
             },
         },
+        access_token => {
+            use_session => 0,
+            credential => {
+                class => 'AccessToken',
+                token_field => 'extra',
+                # This means the token has to be 18 characters long (as generated by AuthToken)
+                token_lookup => { like => "%access_token,T18:TOKEN,%" },
+            },
+            store => {
+                class => 'DBIx::Class',
+                user_model => 'DB::User',
+            },
+        },
     },
 );