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

(-)a/C4/Reserves.pm (-5 / +4 lines)
Lines 2008-2014 sub MoveReserve { Link Here
2008
        }
2008
        }
2009
2009
2010
        if ( $cancelreserve eq 'revert' ) { ## Revert waiting reserve to priority 1
2010
        if ( $cancelreserve eq 'revert' ) { ## Revert waiting reserve to priority 1
2011
            RevertWaitingStatus( itemnumber => $itemnumber );
2011
            RevertWaitingStatus({ itemnumber => $itemnumber });
2012
        }
2012
        }
2013
        elsif ( $cancelreserve eq 'cancel' || $cancelreserve ) { # cancel reserves on this item
2013
        elsif ( $cancelreserve eq 'cancel' || $cancelreserve ) { # cancel reserves on this item
2014
            CancelReserve(0, $res->{'itemnumber'}, $res->{'borrowernumber'});
2014
            CancelReserve(0, $res->{'itemnumber'}, $res->{'borrowernumber'});
Lines 2063-2069 sub MergeHolds { Link Here
2063
2063
2064
=head2 RevertWaitingStatus
2064
=head2 RevertWaitingStatus
2065
2065
2066
  $success = RevertWaitingStatus( itemnumber => $itemnumber );
2066
  $success = RevertWaitingStatus({ itemnumber => $itemnumber });
2067
2067
2068
  Reverts a 'waiting' hold back to a regular hold with a priority of 1.
2068
  Reverts a 'waiting' hold back to a regular hold with a priority of 1.
2069
2069
Lines 2076-2083 sub MergeHolds { Link Here
2076
=cut
2076
=cut
2077
2077
2078
sub RevertWaitingStatus {
2078
sub RevertWaitingStatus {
2079
    my ( %params ) = @_;
2079
    my ( $params ) = @_;
2080
    my $itemnumber = $params{'itemnumber'};
2080
    my $itemnumber = $params->{'itemnumber'};
2081
2081
2082
    return unless ( $itemnumber );
2082
    return unless ( $itemnumber );
2083
2083
2084
- 

Return to bug 8559