Browse Source

* Show --stop-on-parser-error in help

git-svn-id: trunk@43564 -
michael 5 năm trước cách đây
mục cha
commit
f7d6192905
2 tập tin đã thay đổi với 5 bổ sung1 xóa
  1. 2 0
      utils/fpdoc/dglobals.pp
  2. 3 1
      utils/fpdoc/fpdoc.pp

+ 2 - 0
utils/fpdoc/dglobals.pp

@@ -169,6 +169,8 @@ resourcestring
   SUsageOption190  = '                  e.g. --package=fcl';
   SUsageOption200  = '--project=file    Use file as project file';
   SUsageOption210  = '--show-private    Show private methods.';
+  SUsageOption215  = '--stop-on-parser-error';
+  SUsageOption215A = '                  Stop when a parser error occurs. Default is to ignore parser errors.';
   SUsageOption220  = '--warn-no-node    Warn if no documentation node was found.';
   SUsageOption230  = '--mo-dir=dir      Set directory where language files reside to dir';
   SUsageOption240  = '--parse-impl      (Experimental) try to parse implementation too';

+ 3 - 1
utils/fpdoc/fpdoc.pp

@@ -98,6 +98,8 @@ begin
   Writeln(SUsageOption190);
   Writeln(SUsageOption200);
   Writeln(SUsageOption210);
+  Writeln(SUsageOption215);
+  Writeln(SUsageOption215A);
   Writeln(SUsageOption220);
   Writeln(SUsageOption230);
   Writeln(SUsageOption240);
@@ -392,7 +394,7 @@ end;
 Procedure TFPDocApplication.DoRun;
 
 begin
-  ExceptionExitCode:=1;
+   ExceptionExitCode:=1;
   try
   {$IFDEF Unix}
     gettext.TranslateResourceStrings('/usr/local/share/locale/%s/LC_MESSAGES/fpdoc.mo');