From 89dbfd0d990d3b3b193c51b9d699999b19816534 Mon Sep 17 00:00:00 2001 From: mattias Date: Wed, 31 Aug 2022 19:14:52 +0200 Subject: [PATCH] pastojs: fixed search inc file --- packages/pastojs/src/pas2jsfilecache.pp | 1 + 1 file changed, 1 insertion(+) diff --git a/packages/pastojs/src/pas2jsfilecache.pp b/packages/pastojs/src/pas2jsfilecache.pp index c4bd3f78b5..a10ae128bc 100644 --- a/packages/pastojs/src/pas2jsfilecache.pp +++ b/packages/pastojs/src/pas2jsfilecache.pp @@ -1887,6 +1887,7 @@ function TPas2jsFilesCache.FindIncludeFileName(const aFilename, SrcDir, i: Integer; CurFile: String; begin + Result:=false; Dir:=IncludeTrailingPathDelimiter(Dir); for i:=0 to length(SearchedDir)-1 do if SearchedDir[i]=Dir then exit;