summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/Kratos/DFADriver/Model.pm8
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/Kratos/DFADriver/Model.pm b/lib/Kratos/DFADriver/Model.pm
index db428e0..ba3855f 100644
--- a/lib/Kratos/DFADriver/Model.pm
+++ b/lib/Kratos/DFADriver/Model.pm
@@ -81,6 +81,14 @@ sub new_from_repo {
push( @states, $attrib );
push( @{ $transition{ $function->{name} }{dst} }, $attrib );
}
+ elsif ( $attrib =~ s{ ^ required_in_ }{}x ) {
+ push(
+ @{
+ $self->{custom_code}{after_transition_by_state}{$attrib}
+ },
+ $function->{name}
+ );
+ }
elsif ( $attrib =~ m{ ^ epilogue $ }x ) {
$transition{ $function->{name} }{level} = 'epilogue';
}