Преглед на файлове

* Fix missing inherited

Michaël Van Canneyt преди 3 години
родител
ревизия
f77bd0226f
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      packages/fcl-web/src/jsonrpc/webjsonrpc.pp

+ 2 - 0
packages/fcl-web/src/jsonrpc/webjsonrpc.pp

@@ -356,6 +356,8 @@ Var
   R : TJSONStringType;
 
 begin
+  // We must set SessionRequest
+  Inherited HandleRequest(aRequest,aResponse);
   if CORS.HandleRequest(aRequest,aResponse,[hcDetect,hcSend]) then
     exit;
   If (Dispatcher=Nil) then