paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 21:47:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-base: ReloadEnvironmentStrings: check window

Browse Source
This commit is contained in:
mattias 2022-05-12 10:57:30 +02:00
parent 6a1e0ca5dc
commit 1575dd7eeb
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-base/serviceworkerapp.pas
View File

@ -59,6 +59,8 @@ var
S,N : String;
A,P : TStringDynArray;
begin
if not jsvalue(Window) then exit;
if not jsvalue(Window.location) then exit;
if Assigned(EnvNames) then
FreeAndNil(EnvNames);
EnvNames:=TJSObject.new;