Parent Directory | Revision Log | Patch
revision 174 by dpavlin, Mon Jun 16 16:48:16 2008 UTC | revision 186 by dpavlin, Mon Jun 16 22:56:14 2008 UTC | |
---|---|---|
# | Line 43 before '*' => run { | Line 43 before '*' => run { |
43 | ||
44 | }; | }; |
45 | ||
46 | sub first_instance { | |
47 | my $selection = A3C::Model::StrixInstanceSelectionCollection->new; | |
48 | $selection->unlimit; | |
49 | my $instance = $selection->first->instance->instance; | |
50 | warn "# using default instance $instance"; | |
51 | return $instance; | |
52 | } | |
53 | ||
54 | before '/strix/' => run { | |
55 | ||
56 | if ( ! get('instance') ) { | |
57 | set 'instance' => first_instance; | |
58 | } | |
59 | ||
60 | }; | |
61 | ||
62 | 1; | 1; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |