From 217b486b0357cf969b8f0ec52ba1078f53e28873 Mon Sep 17 00:00:00 2001
From: Patrick Donelan <pat@patspam.com>
Date: Tue, 6 Apr 2010 21:00:56 -0400
Subject: [PATCH] Delayed response

---
 lib/WebGUI.pm | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI.pm b/lib/WebGUI.pm
index 21531008e..c7f89d42e 100644
--- a/lib/WebGUI.pm
+++ b/lib/WebGUI.pm
@@ -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;