mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-15 11:39:27 +02:00
IDE: Support dotted unit names in TBuildManager.CheckUnitPathForAmbiguousPascalFiles.
git-svn-id: trunk@55751 -
This commit is contained in:
parent
b56debdb32
commit
be69e6c632
@ -48,7 +48,7 @@ uses
|
||||
IDEOptionsIntf, ProjectIntf, MacroIntf, IDEDialogs, IDEExternToolIntf,
|
||||
CompOptsIntf, LazIDEIntf, MacroDefIntf, IDEMsgIntf,
|
||||
// IDE
|
||||
IDECmdLine, LazarusIDEStrConsts, DialogProcs, IDEProcs,
|
||||
IDECmdLine, LazarusIDEStrConsts, DialogProcs, IDEProcs, IDEUtils,
|
||||
InputHistory, EditDefineTree, ProjectResources, MiscOptions, LazConf,
|
||||
EnvironmentOpts, TransferMacros, CompilerOptions,
|
||||
ExtTools, etMakeMsgParser, etFPCMsgParser,
|
||||
@ -1595,7 +1595,7 @@ begin
|
||||
else
|
||||
continue;
|
||||
CurUnitName:=ExtractFilenameOnly(FileInfo.Name);
|
||||
if not IsValidIdent(CurUnitName) then
|
||||
if not LazIsValidIdent(CurUnitName) then
|
||||
continue;
|
||||
CurFilename:=CurDir+FileInfo.Name;
|
||||
//DebugLn(['TBuildManager.CheckUnitPathForAmbiguousPascalFiles ',CurUnitName,' ',CurFilename]);
|
||||
|
Loading…
Reference in New Issue
Block a user