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

(-)a/C4/Auth_with_shibboleth.pm (-2 / +9 lines)
Lines 106-115 sub checkpw_shib { Link Here
106
        return ( 1, $retnumber, $userid );
106
        return ( 1, $retnumber, $userid );
107
    }
107
    }
108
108
109
    # If we reach this point, the user is not yet a valid koha user
109
    if ( $config->{'autocreate'} ) {
110
    if ( $config->{'autocreate'} ) {
110
        return _autocreate( $dbh, $config, $match );
111
        return _autocreate( $dbh, $config, $match );
111
    } else {
112
    } else {
112
        # If we reach this point, the user is not a valid koha user
113
        $debug and warn "User with $config->{matchpoint} of $match is not a valid Koha user";
113
        $debug and warn "User with $config->{matchpoint} of $match is not a valid Koha user";
114
        return 0;
114
        return 0;
115
    }
115
    }
Lines 284-289 Given a database handle and a shib_login attribute, this routine checks for a ma Link Here
284
284
285
  my ( $retval, $retcard, $retuserid ) = C4::Auth_with_shibboleth::checkpw_shib( $dbh, $shib_login );
285
  my ( $retval, $retcard, $retuserid ) = C4::Auth_with_shibboleth::checkpw_shib( $dbh, $shib_login );
286
286
287
=head2 _autocreate
288
289
  my ( $retval, $retcard, $retuserid ) = _autocreate( $dbh, $shib, $userid );
290
291
Given a database handle, a shibboleth attribute reference and a userid this internal routine will add the given user to koha and return their user credentials
292
293
This routine is NOT exported
294
287
=head1 SEE ALSO
295
=head1 SEE ALSO
288
296
289
=cut
297
=cut
290
- 

Return to bug 12026