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

(-)a/C4/Auth_with_shibboleth.pm (-2 / +9 lines)
Lines 104-113 sub checkpw_shib { Link Here
104
        return ( 1, $borrower->get_column('cardnumber'), $borrower->get_column('userid') );
104
        return ( 1, $borrower->get_column('cardnumber'), $borrower->get_column('userid') );
105
    }
105
    }
106
106
107
    # If we reach this point, the user is not yet a valid koha user
107
    if ( $config->{'autocreate'} ) {
108
    if ( $config->{'autocreate'} ) {
108
        return _autocreate( $dbh, $config, $match );
109
        return _autocreate( $dbh, $config, $match );
109
    } else {
110
    } else {
110
        # If we reach this point, the user is not a valid koha user
111
        $debug and warn "User with $config->{matchpoint} of $match is not a valid Koha user";
111
        $debug and warn "User with $config->{matchpoint} of $match is not a valid Koha user";
112
        return 0;
112
        return 0;
113
    }
113
    }
Lines 282-287 Given a database handle and a shib_login attribute, this routine checks for a ma Link Here
282
282
283
  my ( $retval, $retcard, $retuserid ) = C4::Auth_with_shibboleth::checkpw_shib( $shib_login );
283
  my ( $retval, $retcard, $retuserid ) = C4::Auth_with_shibboleth::checkpw_shib( $shib_login );
284
284
285
=head2 _autocreate
286
287
  my ( $retval, $retcard, $retuserid ) = _autocreate( $dbh, $shib, $userid );
288
289
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
290
291
This routine is NOT exported
292
285
=head1 SEE ALSO
293
=head1 SEE ALSO
286
294
287
=cut
295
=cut
288
- 

Return to bug 12026