From de5ed192635ad410f84d8bcda11a4d8956a37b77 Mon Sep 17 00:00:00 2001 From: juha Date: Sat, 2 Apr 2011 11:13:25 +0000 Subject: [PATCH] temp git-svn-id: trunk@30124 - --- converter/usedunits.pas | 2 ++ 1 file changed, 2 insertions(+) diff --git a/converter/usedunits.pas b/converter/usedunits.pas index 38e9e049d6..fae08a7359 100644 --- a/converter/usedunits.pas +++ b/converter/usedunits.pas @@ -510,6 +510,8 @@ constructor TUsedUnitsTool.Create(ACTLink: TCodeToolLink; AFilename: string); begin inherited Create; fCTLink:=ACTLink; + if pos('fraInspectorPath', AFilename) > 0 then + fFilename:=''; fFilename:=AFilename; fIsMainFile:=False; fIsConsoleApp:=False;