Revision cb146b01
Von Thomas Heck vor etwa 11 Jahren hinzugefügt
| SL/DB/CustomVariable.pm | ||
|---|---|---|
| 6 | 6 |
use strict; |
| 7 | 7 |
|
| 8 | 8 |
use SL::DB::MetaSetup::CustomVariable; |
| 9 |
use SL::DB::CustomVariableValidity; |
|
| 9 | 10 |
|
| 10 | 11 |
__PACKAGE__->meta->initialize; |
| 11 | 12 |
|
| ... | ... | |
| 22 | 23 |
goto &text_value; # text and select |
| 23 | 24 |
} |
| 24 | 25 |
|
| 26 |
sub is_valid {
|
|
| 27 |
my ($self) = @_; |
|
| 28 |
|
|
| 29 |
return SL::DB::Manager::CustomVariableValidity->get_all_count(config_id => $self->config_id, trans_id => $self->trans_id) == 0; |
|
| 30 |
} |
|
| 31 |
|
|
| 25 | 32 |
1; |
Auch abrufbar als: Unified diff
Validity-Accessor für CVars