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

(-)a/C4/Auth_with_ldap.pm (-1 / +11 lines)
Lines 228-233 sub ldap_entry_2_hash ($$) { Link Here
228
		( substr($borrower{'firstname'},0,1)
228
		( substr($borrower{'firstname'},0,1)
229
  		. substr($borrower{ 'surname' },0,1)
229
  		. substr($borrower{ 'surname' },0,1)
230
  		. " ");
230
  		. " ");
231
232
	# check if categorycode exists, if not, fallback to default from koha-conf.xml
233
	my $dbh = C4::Context->dbh;
234
	my $sth = $dbh->prepare("SELECT categorycode FROM categories WHERE categorycode = ?");
235
	$sth->execute( uc($borrower{'categorycode'}) );
236
	unless ( my $row = $sth->fetchrow_hashref ) {
237
		my $default = $mapping{'categorycode'}->{content};
238
		$debug && warn "Can't find ", $borrower{'categorycode'}, " default to: $default for ", $borrower{userid};
239
		$borrower{'categorycode'} = $default
240
	}
241
231
	return %borrower;
242
	return %borrower;
232
}
243
}
233
244
234
- 

Return to bug 6022