diff --git a/packages/fcl-web/src/fpweb.pp b/packages/fcl-web/src/fpweb.pp index de5d553d9d..d3d31113cc 100644 --- a/packages/fcl-web/src/fpweb.pp +++ b/packages/fcl-web/src/fpweb.pp @@ -465,6 +465,12 @@ begin UpdateSession(AResponse); FRequest := Nil; FResponse := Nil; + // Clean up session for the case the webmodule is used again + if assigned(Session) then + begin + Session.Free; + Session := nil; + end; {$ifdef cgidebug} SendMethodExit('WebModule('+Name+').handlerequest'); {$endif cgidebug}