|
Lines 219-224
sub unblessed {
Link Here
|
| 219 |
return { $self->_result->get_columns }; |
219 |
return { $self->_result->get_columns }; |
| 220 |
} |
220 |
} |
| 221 |
|
221 |
|
|
|
222 |
=head3 $object->get_from_storage; |
| 223 |
|
| 224 |
=cut |
| 225 |
|
| 226 |
sub get_from_storage { |
| 227 |
my ( $self, $attrs ) = @_; |
| 228 |
my $stored_object = $self->_result->get_from_storage($attrs); |
| 229 |
my $object_class = Koha::Object::_get_object_class( $self->_result->result_class ); |
| 230 |
return $object_class->_new_from_dbic($stored_object); |
| 231 |
} |
| 232 |
|
| 222 |
=head3 $object->TO_JSON |
233 |
=head3 $object->TO_JSON |
| 223 |
|
234 |
|
| 224 |
Returns an unblessed representation of the object, suitable for JSON output. |
235 |
Returns an unblessed representation of the object, suitable for JSON output. |