acion infrastructure

[scpubgit/DKit.git] / lib / DX / Action / FromCode.pm

diff --git a/lib/DX/Action/FromCode.pm b/lib/DX/Action/FromCode.pm
index 88e8b27..339e8a9 100644 (file)
--- a/lib/DX/Action/FromCode.pm
+++ b/lib/DX/Action/FromCode.pm
@@ -6,7 +6,11 @@ has expect => (is => 'ro', required => 1);
 
 has perform => (is => 'ro', required => 1);
 
+has dependencies => (is => 'ro', default => sub { [] });
+
 sub expected_effect { $_[0]->expect->() }
 sub run { $_[0]->perform->() }
 
+sub but { my ($self, @but) = @_; ref($self)->new(%$self, @but); }
+
 1;