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 |
- |
|
|