|
Lines 77-82
sub login {
Link Here
|
| 77 |
return $c->redirect_to( $uri . "?auth_error=$error" ); |
77 |
return $c->redirect_to( $uri . "?auth_error=$error" ); |
| 78 |
} |
78 |
} |
| 79 |
|
79 |
|
|
|
80 |
if ( !$c->req->cookie('CGISESSID') ) { |
| 81 |
my $error = "No user session found"; |
| 82 |
return $c->redirect_to( $uri . "?auth_error=$error" ); |
| 83 |
} |
| 84 |
|
| 80 |
unless ( $provider_config->{authorize_url} =~ /response_type=code/ ) { |
85 |
unless ( $provider_config->{authorize_url} =~ /response_type=code/ ) { |
| 81 |
my $authorize_url = Mojo::URL->new( $provider_config->{authorize_url} ); |
86 |
my $authorize_url = Mojo::URL->new( $provider_config->{authorize_url} ); |
| 82 |
$authorize_url->query->append( response_type => 'code' ); |
87 |
$authorize_url->query->append( response_type => 'code' ); |
| 83 |
- |
|
|