Lines 179-186
sub store {
Link Here
|
179 |
|
179 |
|
180 |
|
180 |
|
181 |
if ( exists $updated_columns{location} |
181 |
if ( exists $updated_columns{location} |
182 |
and $self->location ne 'CART' |
182 |
and ( !defined($self->location) or $self->location !~ /^(CART|PROC)$/ ) |
183 |
and $self->location ne 'PROC' |
|
|
184 |
and not exists $updated_columns{permanent_location} ) |
183 |
and not exists $updated_columns{permanent_location} ) |
185 |
{ |
184 |
{ |
186 |
$self->permanent_location( $self->location ); |
185 |
$self->permanent_location( $self->location ); |
187 |
- |
|
|