30 |
sub available_values { |
sub available_values { |
31 |
my $self = shift; |
my $self = shift; |
32 |
my $field = shift; |
my $field = shift; |
33 |
#warn "# available_values( $field )"; |
warn "# available_values( $field )"; |
34 |
if ( $field eq 'instance' ) { |
if ( $field eq 'instance' ) { |
35 |
my $coll = A3C::Model::StrixInstanceCollection->new; |
my $coll = A3C::Model::StrixInstanceCollection->new; |
36 |
$coll->unlimit; |
$coll->unlimit; |
51 |
my $coll = A3C::Model::StrixSiteCollection->new; |
my $coll = A3C::Model::StrixSiteCollection->new; |
52 |
$coll->limit( column => 'instance', value => $instance ); |
$coll->limit( column => 'instance', value => $instance ); |
53 |
|
|
54 |
|
if ( $coll->count == 0 ) { |
55 |
|
warn "SYNC sites for $instance\n"; |
56 |
|
Strix::Import->sites( $instance ); |
57 |
|
# FIXME re-run query? |
58 |
|
$coll = A3C::Model::StrixSiteCollection->new; |
59 |
|
$coll->limit( column => 'instance', value => $instance ); |
60 |
|
} |
61 |
|
|
62 |
return [{ display => _('No sites') }] unless $coll->count; |
return [{ display => _('No sites') }] unless $coll->count; |
63 |
|
|
64 |
#warn "# intance $instance as ",$coll->count," sites\n"; |
#warn "# intance $instance as ",$coll->count," sites\n"; |