diff --git a/src/grongier/cls/Grongier/Service/WSGI.cls b/src/grongier/cls/Grongier/Service/WSGI.cls index e2830e7..b26409e 100644 --- a/src/grongier/cls/Grongier/Service/WSGI.cls +++ b/src/grongier/cls/Grongier/Service/WSGI.cls @@ -31,9 +31,7 @@ ClassMethod Page(skipheader As %Boolean = 0) As %Status [ ProcedureBlock = 1 ] Set %response.Domain = ..#DOMAIN Do %response.MatchLanguage() - if ..#DEVMODE { - w %session.SessionId - } + #; Record if device re-direction is already active Set tRedirected=##class(%Library.Device).ReDirectIO() @@ -110,6 +108,11 @@ ClassMethod Page(skipheader As %Boolean = 0) As %Status [ ProcedureBlock = 1 ] Do ##class(%Library.Device).ReDirectIO(1) } + if ..#DEVMODE { + #; Close the device to ensure next request starts with a new process + Close 0 + } + Quit $$$OK }