Parent Directory | Revision Log | Patch
revision 197 by dpavlin, Tue Jun 17 21:32:12 2008 UTC | revision 199 by dpavlin, Tue Jun 17 23:04:29 2008 UTC | |
---|---|---|
# | Line 43 before '*' => run { | Line 43 before '*' => run { |
43 | ||
44 | }; | }; |
45 | ||
sub first_instance { | ||
my $selection = A3C::Model::StrixInstanceSelectionCollection->new; | ||
$selection->unlimit; | ||
my $instance = $selection->first->instance->instance; | ||
warn "# using default instance $instance"; | ||
return $instance; | ||
} | ||
before '/strix/' => run { | ||
if ( ! get('instance') ) { | ||
set 'instance' => first_instance; | ||
} | ||
}; | ||
46 | 1; | 1; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |