|
Lines 252-257
sub unblessed {
Link Here
|
| 252 |
return [ map { $_->unblessed } $self->as_list ]; |
252 |
return [ map { $_->unblessed } $self->as_list ]; |
| 253 |
} |
253 |
} |
| 254 |
|
254 |
|
|
|
255 |
=head3 Koha::Objects->get_column |
| 256 |
|
| 257 |
Return all the values of this set for a given column |
| 258 |
|
| 259 |
=cut |
| 260 |
|
| 261 |
sub get_column { |
| 262 |
my ($self, $column_name) = @_; |
| 263 |
return $self->_resultset->get_column( $column_name )->all; |
| 264 |
} |
| 265 |
|
| 255 |
=head3 Koha::Objects->TO_JSON |
266 |
=head3 Koha::Objects->TO_JSON |
| 256 |
|
267 |
|
| 257 |
Returns an unblessed representation of objects, suitable for JSON output. |
268 |
Returns an unblessed representation of objects, suitable for JSON output. |
|
Lines 335-341
Currently count, pager, update and delete are covered.
Link Here
|
| 335 |
sub AUTOLOAD { |
346 |
sub AUTOLOAD { |
| 336 |
my ( $self, @params ) = @_; |
347 |
my ( $self, @params ) = @_; |
| 337 |
|
348 |
|
| 338 |
my @known_methods = qw( count pager update delete result_class single get_column ); |
349 |
my @known_methods = qw( count pager update delete result_class single ); |
| 339 |
my $method = our $AUTOLOAD; |
350 |
my $method = our $AUTOLOAD; |
| 340 |
$method =~ s/.*:://; |
351 |
$method =~ s/.*:://; |
| 341 |
|
352 |
|