paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 11:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Patch from Luxa Olivetti to fix memleak, fix issue #39941

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-10-09 12:27:51 +02:00
parent 336d531687
commit 438f21c0d6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-web/src/jsonrpc/fpjsonrpc.pp
View File

@ -1103,9 +1103,9 @@ begin
H:=FindHandler(AClassName,AMethodName,AContext,FreeObject);
If (H=Nil) then
if (AClassName='') then
Exit(CreateJSON2Error(SErrInvalidMethodName,[AMethodName],EJSONRPCMethodNotFound,ID.Clone,transactionProperty))
Exit(CreateJSON2Error(SErrInvalidMethodName,[AMethodName],EJSONRPCMethodNotFound,ID,transactionProperty))
else
Exit(CreateJSON2Error(SErrInvalidClassMethodName,[AClassName,AMethodName],EJSONRPCMethodNotFound,ID.Clone,transactionProperty));
Exit(CreateJSON2Error(SErrInvalidClassMethodName,[AClassName,AMethodName],EJSONRPCMethodNotFound,ID,transactionProperty));
try
If Assigned(FOndispatchRequest) then
FOndispatchRequest(Self,AClassName,AMethodName,Params);