IDE: checking compiled state: ignore -v flags

git-svn-id: trunk@36650 -

packager/packagesystem.pas

@@ -468,6 +468,7 @@ begin
     if (Reduced[StartPos]='-') and (StartPos<length(Reduced)) then begin
       case Reduced[StartPos+1] of
       'F':
+        // search paths
         if StartPos<length(Reduced)-1 then begin
           Path:=copy(Reduced,StartPos+3,EndPos-StartPos-3);
           if (Path<>'') and (Path[1] in ['''','"']) then
@@ -484,6 +485,14 @@ begin
           System.Delete(Reduced,StartPos,EndPos-StartPos);
           EndPos:=StartPos;
         end;
+      'v':
+        // verbosity
+        begin
+          while (EndPos<=length(Reduced)) and (Reduced[EndPos] in [' ',#9]) do
+            inc(EndPos);
+          System.Delete(Reduced,StartPos,EndPos-StartPos);
+          EndPos:=StartPos;
+        end;
       end;
     end;
   end;