| blib/lib/OpenID/Login/Discover.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 10 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 5 | 0 | if ($server) |
| 31 | 5 | 0 | if ($xrds =~ m[<URI>([^<>]+)</URI>]) |
| 44 | 0 | 10 | unless $res->is_success |
| 52 | 0 | 5 | unless $res |
| 53 | 0 | 5 | unless my $xrds_location = $res->header('X-XRDS-Location') |