Lines 49-57
sub store {
Link Here
|
49 |
$flush = 1; |
49 |
$flush = 1; |
50 |
} |
50 |
} |
51 |
else { |
51 |
else { |
52 |
my $self_from_storage = $self->get_from_storage; |
52 |
my %updated_columns = $self->_result->get_dirty_columns; |
53 |
$flush = 1 if ( $self_from_storage->lib ne $self->lib ); |
53 |
|
54 |
$flush = 1 if ( $self_from_storage->lib_opac ne $self->lib_opac ); |
54 |
if ( exists $updated_columns{lib} |
|
|
55 |
or exists $updated_columns{lib_opac} ) |
56 |
{ |
57 |
$flush = 1; |
58 |
} |
55 |
} |
59 |
} |
56 |
|
60 |
|
57 |
$self = $self->SUPER::store; |
61 |
$self = $self->SUPER::store; |
58 |
- |
|
|