Delayed response

This commit is contained in:
Patrick Donelan 2010-04-06 21:00:56 -04:00
parent 191d4fc401
commit 217b486b03

View file

@ -86,9 +86,13 @@ sub compile_psgi_app {
my $app = sub {
my $env = shift;
my $request = WebGUI::Request->new($env);
my $response = $self->dispatch($request);
return $response;
return sub {
my $callback = shift;
my $request = WebGUI::Request->new($env);
my $response = $self->dispatch($request);
$callback->($response);
}
};
my $config = $self->config;