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

(-)a/C4/Circulation.pm (-1 / +8 lines)
Lines 2010-2015 sub AddReturn { Link Here
2010
        if ( $issue->{overdue} && $issue->{date_due} ) {
2010
        if ( $issue->{overdue} && $issue->{date_due} ) {
2011
        # fix fine days
2011
        # fix fine days
2012
            $today = $dropboxdate if $dropbox;
2012
            $today = $dropboxdate if $dropbox;
2013
            if ($borrower->{debarred}){
2014
                my $borrower_debar_dt = dt_from_string( $borrower->{debarred} );
2015
                $borrower_debar_dt->truncate(to => 'day');
2016
                my $today_dt = $today->clone()->truncate(to => 'day');
2017
                if ( DateTime->compare( $borrower_debar_dt, $today_dt ) != -1 ) {
2018
                    $messages->{'PrevDebarred'} = $borrower->{'debarred'};
2019
                }
2020
            }
2013
            my ($debardate,$reminder) = _debar_user_on_return( $borrower, $item, $issue->{date_due}, $today );
2021
            my ($debardate,$reminder) = _debar_user_on_return( $borrower, $item, $issue->{date_due}, $today );
2014
            if ($reminder){
2022
            if ($reminder){
2015
                $messages->{'PrevDebarred'} = $debardate;
2023
                $messages->{'PrevDebarred'} = $debardate;
2016
- 

Return to bug 14784