X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FResult.pm;h=2e49cf75aa64e2dc00579856e2d1f0e7587a8be7;hb=60c182d8c6c3ee2ea17e7938908c15a4f95e2a90;hp=008ea736d19cffd5e9900d932fe9135eff9be53a;hpb=02ae4168791e6bc2bebed5f455325ae727601418;p=scpubgit%2FDKit.git diff --git a/lib/DX/Result.pm b/lib/DX/Result.pm index 008ea73..2e49cf7 100644 --- a/lib/DX/Result.pm +++ b/lib/DX/Result.pm @@ -14,7 +14,12 @@ sub actions { return map $_->action, grep $_->has_action, values %$by_id; } -sub dependent_actions { +sub independent_actions { + my ($self) = @_; + return grep !@{$_->dependencies}, $self->actions; +} + +sub expand_action_dependencies { my ($self, $action) = @_; my $by_id = $self->_state->by_id; return map $by_id->{$_}->action, @{$action->dependencies};