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

(-)a/Koha/ArticleRequest.pm (-4 / +3 lines)
Lines 57-63 sub request { Link Here
57
    ) unless $self->borrower->can_request_article;
57
    ) unless $self->borrower->can_request_article;
58
58
59
    $self->status(Koha::ArticleRequest::Status::Requested);
59
    $self->status(Koha::ArticleRequest::Status::Requested);
60
    $self->SUPER::store();
60
    $self->store();
61
    $self->notify();
61
    $self->notify();
62
    return $self;
62
    return $self;
63
}
63
}
Lines 74-80 sub set_pending { Link Here
74
    my ($self) = @_;
74
    my ($self) = @_;
75
75
76
    $self->status(Koha::ArticleRequest::Status::Pending);
76
    $self->status(Koha::ArticleRequest::Status::Pending);
77
    $self->SUPER::store();
77
    $self->store();
78
    $self->notify();
78
    $self->notify();
79
    return $self;
79
    return $self;
80
}
80
}
Lines 204-210 sub store { Link Here
204
        return $self->SUPER::store;
204
        return $self->SUPER::store;
205
    } else {
205
    } else {
206
        $self->created_on( dt_from_string() );
206
        $self->created_on( dt_from_string() );
207
        return $self->request;
207
        return $self->SUPER::store;
208
    }
208
    }
209
}
209
}
210
210
211
- 

Return to bug 29182