From 8b023b3de17aed3cb68e244c4e5a0a4b26b55200 Mon Sep 17 00:00:00 2001
From: Will Hunt <will@half-shot.uk>
Date: Mon, 16 May 2022 17:47:58 +0100
Subject: [PATCH] Check access_token
---
tests/60app-services/05lookup3pe.pl | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/tests/60app-services/05lookup3pe.pl b/tests/60app-services/05lookup3pe.pl
index f84b9e55d..e29ace7af 100644
--- a/tests/60app-services/05lookup3pe.pl
+++ b/tests/60app-services/05lookup3pe.pl
@@ -145,12 +145,15 @@ sub stub_empty_result
sub { 1 }
)->then( sub {
my ( $request ) = @_;
+
+ my $access_token = $appserv1->info->hs2as_token;
assert_deeply_eq(
{ $request->query_form },
{
field1 => "ONE",
field2 => "TWO",
+ access_token => $access_token,
},
'fields in received AS request'
);
@@ -209,11 +212,13 @@ sub stub_empty_result
sub { 1 }
)->then( sub {
my ( $request ) = @_;
+ my $access_token = $appserv1->info->hs2as_token;
assert_deeply_eq(
{ $request->query_form },
{
field3 => "THREE",
+ access_token => $access_token,
},
'fields in received AS request'
);