|
Lines 34-40
sub list {
Link Here
|
| 34 |
foreach my $key (keys %$params) { |
34 |
foreach my $key (keys %$params) { |
| 35 |
delete $params->{$key} unless grep { $key eq $_ } @valid_params; |
35 |
delete $params->{$key} unless grep { $key eq $_ } @valid_params; |
| 36 |
} |
36 |
} |
| 37 |
my $holds = Koha::Holds->search($params)->unblessed; |
37 |
my $holds = Koha::Holds->search($params); |
| 38 |
|
38 |
|
| 39 |
return $c->$cb($holds, 200); |
39 |
return $c->$cb($holds, 200); |
| 40 |
} |
40 |
} |
|
Lines 106-112
sub add {
Link Here
|
| 106 |
}, 500); |
106 |
}, 500); |
| 107 |
} |
107 |
} |
| 108 |
|
108 |
|
| 109 |
my $reserve = C4::Reserves::GetReserve($reserve_id); |
109 |
my $reserve = Koha::Holds->find($reserve_id); |
| 110 |
|
110 |
|
| 111 |
return $c->$cb($reserve, 201); |
111 |
return $c->$cb($reserve, 201); |
| 112 |
} |
112 |
} |
|
Lines 137-144
sub edit {
Link Here
|
| 137 |
rank => $priority, |
137 |
rank => $priority, |
| 138 |
suspend_until => $suspend_until, |
138 |
suspend_until => $suspend_until, |
| 139 |
}; |
139 |
}; |
|
|
140 |
|
| 140 |
C4::Reserves::ModReserve($params); |
141 |
C4::Reserves::ModReserve($params); |
| 141 |
$reserve = C4::Reserves::GetReserve($reserve_id); |
142 |
$reserve = Koha::Holds->find($reserve_id); |
| 142 |
|
143 |
|
| 143 |
return $c->$cb($reserve, 200); |
144 |
return $c->$cb($reserve, 200); |
| 144 |
} |
145 |
} |