renamed ambiguous identifier

This commit is contained in:
Basile Burg 2015-09-19 09:13:17 +02:00
parent 845053b5e0
commit eeab445c67
2 changed files with 2 additions and 2 deletions

View File

@ -1426,7 +1426,7 @@ end;
procedure TCEMainForm.actFileAddToProjExecute(Sender: TObject);
begin
if fDoc = nil then exit;
if fDoc.isProjectSource then exit; // TODO: rename this ambiguous property name to 'isProjectFile'
if fDoc.isProjectFile then exit;
if fProjectInterface = nil then exit;
//
if fProjectInterface.getFormat = pfNative then

View File

@ -159,7 +159,7 @@ type
//
property syncroEdit: TSynPluginSyncroEdit read fSyncEdit;
property isDSource: boolean read fIsDSource;
property isProjectSource: boolean read fIsConfig;
property isProjectFile: boolean read fIsConfig; // warning: never set !
property isTemporary: boolean read getIfTemp;
property TextView;
//