Lines 121-128
Returns:
Link Here
|
121 |
sub store { |
121 |
sub store { |
122 |
my ($self) = @_; |
122 |
my ($self) = @_; |
123 |
|
123 |
|
124 |
my $columns_info = Koha::Database->new->schema->resultset( $self->_type ) |
124 |
my $columns_info = $self->_result->result_source->columns_info; |
125 |
->result_source->{_columns}; |
|
|
126 |
|
125 |
|
127 |
# Handle not null and default values for integers and dates |
126 |
# Handle not null and default values for integers and dates |
128 |
foreach my $col ( keys %{$columns_info} ) { |
127 |
foreach my $col ( keys %{$columns_info} ) { |
129 |
- |
|
|