paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 12:40:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

pas2js: fixed macro stamp

Browse Source 
git-svn-id: trunk@58145 -
This commit is contained in:
mattias 2018-06-05 17:37:18 +00:00
parent 96c06ef599
commit 95d0e4cf75
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/pas2js/pjsdsgnoptions.pas
View File

@ -215,13 +215,16 @@ begin
end; end;
constructor TPas2jsOptions.Create; constructor TPas2jsOptions.Create;
var
o: TPas2jsCachedOption;
begin begin
FChangeStamp:=LUInvalidChangeStamp64; FChangeStamp:=LUInvalidChangeStamp64;
FCachedOptions[p2jcoCompilerFilename].RawValue:=PJSDefaultCompiler; FCachedOptions[p2jcoCompilerFilename].RawValue:=PJSDefaultCompiler;
FCachedOptions[p2jcoHTTPServerFilename].RawValue:=PJSDefaultHTTPServer; FCachedOptions[p2jcoHTTPServerFilename].RawValue:=PJSDefaultHTTPServer;
FCachedOptions[p2jcoNodeJSFilename].RawValue:=PJSDefaultNodeJS; FCachedOptions[p2jcoNodeJSFilename].RawValue:=PJSDefaultNodeJS;
FCachedOptions[p2jcoBrowserFilename].RawValue:=PJSDefaultBrowser; FCachedOptions[p2jcoBrowserFilename].RawValue:=PJSDefaultBrowser;
for o in TPas2jsCachedOption do
FCachedOptions[o].Stamp:=LUInvalidChangeStamp64;
end; end;
destructor TPas2jsOptions.Destroy; destructor TPas2jsOptions.Destroy;