paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 18:29:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Warn-no-node correctly passed on

Browse Source 
git-svn-id: trunk@31230 -
This commit is contained in:
michael 2015-07-26 08:09:11 +00:00
parent 66f4d0bc4e
commit 1c5da41b48
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
utils/fpdoc/mkfpdoc.pp
View File

@ -210,6 +210,7 @@ begin
Engine.HideProtected:=Options.HideProtected; Engine.HideProtected:=Options.HideProtected;
Engine.HidePrivate:=Not Options.ShowPrivate; Engine.HidePrivate:=Not Options.ShowPrivate;
Engine.OnParseUnit:=@HandleOnParseUnit; Engine.OnParseUnit:=@HandleOnParseUnit;
Engine.WarnNoNode:=Options.WarnNoNode;
if Length(Options.Language) > 0 then if Length(Options.Language) > 0 then
TranslateDocStrings(Options.Language); TranslateDocStrings(Options.Language);
for i := 0 to APackage.Inputs.Count - 1 do for i := 0 to APackage.Inputs.Count - 1 do