diff --git a/Kynetx/Request.pm b/Kynetx/Request.pm index df1ce7ed..c6b240cf 100644 --- a/Kynetx/Request.pm +++ b/Kynetx/Request.pm @@ -156,6 +156,12 @@ sub build_request_env { || $r->headers_in->{'Kobj-Session'}; my $api = $options->{'api'} || 'ruleset'; + # allow the random EID to be overridden + $eid = $req_params->{'_eid'} + || $body_params->{'_eid'} + || $eid; + + # build initial envv my $ug = new Data::UUID; diff --git a/t/Request.t b/t/Request.t index f0d9ce33..24f13bb8 100644 --- a/t/Request.t +++ b/t/Request.t @@ -183,7 +183,6 @@ is(Kynetx::Request::get_attr($my_req_info, "type"), undef, $description); $test_count++; - ######################### Clean up Kynetx::Test::flush_test_user($user_ken,$user_username);