View | Details | Raw Unified | Return to bug 28367
Collapse All | Expand All

(-)a/C4/Auth_with_shibboleth.pm (-2 / +1 lines)
Lines 132-138 sub _autocreate { Link Here
132
    my %borrower = ( $config->{matchpoint} => $match );
132
    my %borrower = ( $config->{matchpoint} => $match );
133
133
134
    while ( my ( $key, $entry ) = each %{$config->{'mapping'}} ) {
134
    while ( my ( $key, $entry ) = each %{$config->{'mapping'}} ) {
135
        if ( any { /(^psgi|^plack)/i } keys %ENV ) {
135
        if ( any { /(^psgi\.|^plack\.)/i } keys %ENV ) {
136
            $borrower{$key} = ( $entry->{'is'} && $ENV{"HTTP_" . uc($entry->{'is'}) } ) || $entry->{'content'} || '';
136
            $borrower{$key} = ( $entry->{'is'} && $ENV{"HTTP_" . uc($entry->{'is'}) } ) || $entry->{'content'} || '';
137
        } else {
137
        } else {
138
            $borrower{$key} = ( $entry->{'is'} && $ENV{ $entry->{'is'} } ) || $entry->{'content'} || '';
138
            $borrower{$key} = ( $entry->{'is'} && $ENV{ $entry->{'is'} } ) || $entry->{'content'} || '';
139
- 

Return to bug 28367