Lines 75-82
sub store {
Link Here
|
75 |
} |
75 |
} |
76 |
|
76 |
|
77 |
my %updated_columns = $self->_result->get_dirty_columns; |
77 |
my %updated_columns = $self->_result->get_dirty_columns; |
78 |
if ( exists $updated_columns{itemcallnumber} ) { |
78 |
if ( exists $updated_columns{itemcallnumber} |
79 |
my $cn_sort = GetClassSort($self->cn_source, $self->itemcallnumber, ""); |
79 |
or exists $updated_columns{cn_source} ) |
|
|
80 |
{ |
81 |
my $cn_sort = GetClassSort( $self->cn_source, $self->itemcallnumber, "" ); |
80 |
$self->cn_sort($cn_sort); |
82 |
$self->cn_sort($cn_sort); |
81 |
} |
83 |
} |
82 |
|
84 |
|
83 |
- |
|
|