- my $res = $ctx->{www}->coderepo->srv(\%ctx);
- if (ref($res) eq 'CODE') {
- $res->(delete $ctx{env}->{'qspawn.wcb'});
- } else { # ref($res) eq 'ARRAY'
- $ctx->{env}->{'qspawn.wcb'} = $ctx{env}->{'qspawn.wcb'};
- }
- $res; # non ARRAY ref for ->psgi_return_init_cb
+ $ctx->{env}->{'qspawn.fallback'} = $code;
+ my $res = $ctx->{www}->coderepo->srv($ctx);
+ # for ->psgi_return_init_cb
+ $ctx->{env}->{'qspawn.wcb'} = $wcb;
+ $res; # CODE or ARRAY ref