Transport authChoice in CAS authentication
This commit is contained in:
parent
41151228ff
commit
9e38c5ea2a
@ -41,11 +41,15 @@ sub extractFormInfo {
|
||||
# Local URL
|
||||
my $local_url = $self->url();
|
||||
|
||||
# Add URL parameter if present
|
||||
# Add request state parameters
|
||||
if ( $self->{_url} ) {
|
||||
my $url_param = 'url=' . $self->{_url};
|
||||
$local_url .= ( $local_url =~ /\?/ ? '&' : '?' ) . $url_param;
|
||||
}
|
||||
if ( $self->param( $self->{authChoiceParam} ) ) {
|
||||
my $url_param = $self->{authChoiceParam}.'=' . $self->param( $self->{authChoiceParam} );
|
||||
$local_url .= ( $local_url =~ /\?/ ? '&' : '?' ) . $url_param;
|
||||
}
|
||||
|
||||
# Act as a proxy if proxied services configured
|
||||
my $proxy = ref( $self->{CAS_proxiedServices} ) ? 1 : 0;
|
||||
|
Loading…
Reference in New Issue
Block a user