diff options
| author | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-10-10 09:31:48 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew-github@dracos.co.uk> | 2018-10-10 09:31:48 +0100 |
| commit | 9ecce5d09e5fe806b6d4b221df08f9ae993dc502 (patch) | |
| tree | d50b53a0c7ebcc6c45b0130c8405e8d521b4b5b6 /t/app | |
| parent | 3fa7a7f4026c22d562d0fdb21ce2ec184dd163e0 (diff) | |
[Angus] Remove cobrand.
Diffstat (limited to 't/app')
| -rw-r--r-- | t/app/sendreport/angus.t | 56 |
1 files changed, 0 insertions, 56 deletions
diff --git a/t/app/sendreport/angus.t b/t/app/sendreport/angus.t deleted file mode 100644 index 41379b4ff..000000000 --- a/t/app/sendreport/angus.t +++ /dev/null @@ -1,56 +0,0 @@ -use FixMyStreet::Test; - -use_ok("FixMyStreet::SendReport::Angus"); - -my $u = FixMyStreet::DB->resultset('User')->new( { email => 'test@example.org', name => 'A User' } ); - -my $p = FixMyStreet::DB->resultset('Problem')->new( { - latitude => 1, - longitude => 1, - title => 'title', - detail => 'detail', - user => $u, - id => 1, - name => 'A User', - cobrand => 'fixmystreet', -} ); - -my $angus = FixMyStreet::SendReport::Angus->new(); - -subtest 'parses authentication token correctly' => sub { - my $authxml = <<EOT; - <AuthenticateResponse> - - <AuthenticateResult> - TVRreUxqRTJPQzR5TlRVdU1qSjhNakF4Tmpvd01Ub3lNam94TlRvME16b3pPUT09VGhvdVNoYWx0Tm90UGFzcw== - </AuthenticateResult> - <success> - True - </success> - <message></message> - - </AuthenticateResponse> -EOT -; - is $angus->get_auth_token($authxml), 'TVRreUxqRTJPQzR5TlRVdU1qSjhNakF4Tmpvd01Ub3lNam94TlRvME16b3pPUT09VGhvdVNoYWx0Tm90UGFzcw==', 'token correct'; -}; - -subtest 'parses report external id correctly' => sub { - my $respxml = <<EOT; -<CreateRequestResponse> - - <CreateRequestResult> - <RequestId>7245</RequestId> - </CreateRequestResult> - - <success>True</success> - <message></message> - -</CreateRequestResponse> -EOT -; - is $angus->get_external_id($respxml), '7245', 'external id correct'; -}; - - -done_testing(); |