fix streaming. don't close the session until done

2010-08-03 17:02:39 -05:00 · 2010-08-03 17:02:39 -05:00 · 2a33785d11
commit 2a33785d11
parent d9635343db
2 changed files with 12 additions and 3 deletions
--- a/lib/WebGUI/Middleware/Session.pm
+++ b/lib/WebGUI/Middleware/Session.pm
@ -65,9 +65,14 @@ sub call {
        sub {
            my $res = shift;

-            # Close the Session
-            $env->{'webgui.session'}->close();
-            delete $env->{'webgui.session'};
+            # Close the Session if we aren't streaming
+            if ( !$env->{'webgui.session'}->response->streaming ) { 
+                $env->{'webgui.session'}->close();
+                delete $env->{'webgui.session'};
+            }
+
+            # If we are streaming, the session will be closed inside of 
+            # WebGUI.pm
        }
    );
 }