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

(-)a/members/moremember.pl (-19 lines)
Lines 277-299 foreach (@$alerts) { Link Here
277
    $_->{relatedto} = findrelatedto( $_->{type}, $_->{externalid} );
277
    $_->{relatedto} = findrelatedto( $_->{type}, $_->{externalid} );
278
}
278
}
279
279
280
my $candeleteuser;
281
my $userenv = C4::Context->userenv;
282
if ( C4::Context->IsSuperLibrarian() ) {
283
    $candeleteuser = 1;
284
}
285
elsif ( C4::Context->preference("IndependentBranches") ) {
286
    $candeleteuser = ( $data->{'branchcode'} eq $userenv->{branch} );
287
}
288
else {
289
    if ( C4::Auth::getuserflags( $userenv->{flags}, $userenv->{number} )->{borrowers} ) {
290
        $candeleteuser = 1;
291
    }
292
    else {
293
        $candeleteuser = 0;
294
    }
295
}
296
297
# Add sync data to the user data
280
# Add sync data to the user data
298
if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preference('NorwegianPatronDBEnable') == 1 ) {
281
if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preference('NorwegianPatronDBEnable') == 1 ) {
299
    my $sync = NLGetSyncDataFromBorrowernumber( $borrowernumber );
282
    my $sync = NLGetSyncDataFromBorrowernumber( $borrowernumber );
Lines 360-366 $template->param( $data->{'categorycode'} => 1 ); Link Here
360
$template->param(
343
$template->param(
361
    detailview => 1,
344
    detailview => 1,
362
    AllowRenewalLimitOverride => C4::Context->preference("AllowRenewalLimitOverride"),
345
    AllowRenewalLimitOverride => C4::Context->preference("AllowRenewalLimitOverride"),
363
    CANDELETEUSER    => $candeleteuser,
364
    roadtype        => $roadtype,
346
    roadtype        => $roadtype,
365
    borrowernumber  => $borrowernumber,
347
    borrowernumber  => $borrowernumber,
366
    othernames      => $data->{'othernames'},
348
    othernames      => $data->{'othernames'},
367
- 

Return to bug 13898