|
Lines 186-191
sub store {
Link Here
|
| 186 |
} |
186 |
} |
| 187 |
} |
187 |
} |
| 188 |
|
188 |
|
|
|
189 |
=head3 $object->update(); |
| 190 |
|
| 191 |
A shortcut for set + store in one call. |
| 192 |
|
| 193 |
=cut |
| 194 |
|
| 195 |
sub update { |
| 196 |
my ($self, $values) = @_; |
| 197 |
return $self->set($values)->store();; |
| 198 |
} |
| 199 |
|
| 189 |
=head3 $object->delete(); |
200 |
=head3 $object->delete(); |
| 190 |
|
201 |
|
| 191 |
Removes the object from storage. |
202 |
Removes the object from storage. |
|
Lines 452-458
sub AUTOLOAD {
Link Here
|
| 452 |
} |
463 |
} |
| 453 |
} |
464 |
} |
| 454 |
|
465 |
|
| 455 |
my @known_methods = qw( is_changed id in_storage get_column discard_changes update make_column_dirty ); |
466 |
my @known_methods = qw( is_changed id in_storage get_column discard_changes make_column_dirty ); |
| 456 |
|
467 |
|
| 457 |
Koha::Exceptions::Object::MethodNotCoveredByTests->throw( |
468 |
Koha::Exceptions::Object::MethodNotCoveredByTests->throw( |
| 458 |
error => sprintf("The method %s->%s is not covered by tests!", ref($self), $method), |
469 |
error => sprintf("The method %s->%s is not covered by tests!", ref($self), $method), |
| 459 |
- |
|
|