Browse Source

--- Merging r17125 into '.':
U utils/fpcmkcfg/fpcmkcfg.pp

# revisions: 17125
------------------------------------------------------------------------
r17125 | joost | 2011-03-12 23:13:08 +0100 (Sat, 12 Mar 2011) | 1 line
Changed paths:
M /trunk/utils/fpcmkcfg/fpcmkcfg.pp

* Solved problem with uninitialized variable
------------------------------------------------------------------------

git-svn-id: branches/fixes_2_4@17572 -

marco 14 years ago
parent
commit
786a36db7b
1 changed files with 1 additions and 0 deletions
  1. 1 0
      utils/fpcmkcfg/fpcmkcfg.pp

+ 1 - 0
utils/fpcmkcfg/fpcmkcfg.pp

@@ -353,6 +353,7 @@ Var
 
 
 begin
 begin
   I:=1;
   I:=1;
+  ShowBuiltinCommand := False;
   While( I<=ParamCount) do
   While( I<=ParamCount) do
     begin
     begin
     S:=Paramstr(i);
     S:=Paramstr(i);