From 4b92977b8bd16b3815c6654da302c9771dcf449d Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 1 Oct 2004 13:18:41 +0000
Subject: [PATCH] removed uneeded function TProject.AddNewFile

git-svn-id: trunk@6097 -
---
 ide/project.pp | 13 +++----------
 1 file changed, 3 insertions(+), 10 deletions(-)

diff --git a/ide/project.pp b/ide/project.pp
index ee2d16e73b..72cda330f9 100644
--- a/ide/project.pp
+++ b/ide/project.pp
@@ -454,9 +454,6 @@ type
                       AddToProjectUsesClause: boolean); override;
     procedure RemoveUnit(Index: integer); override;
     function CreateProjectFile(const Filename: string): TLazProjectFile; override;
-    function AddNewFile(NewFileDescriptor: TProjectFileDescriptor;
-                        const NewFilename, NewSource: string;
-                        NewFlags: TNewFlags): TModalResult; override;
 
     // search
     function IndexOf(AUnitInfo: TUnitInfo): integer;
@@ -1649,13 +1646,6 @@ begin
   Result:=AnUnitInfo;
 end;
 
-function TProject.AddNewFile(NewFileDescriptor: TProjectFileDescriptor;
-  const NewFilename, NewSource: string; NewFlags: TNewFlags): TModalResult;
-begin
-  Result:=LazarusIDE.DoNewEditorFile(NewFileDescriptor, NewFilename, NewSource,
-                                     NewFlags);
-end;
-
 {------------------------------------------------------------------------------
   TProject Clear
  ------------------------------------------------------------------------------}
@@ -3131,6 +3121,9 @@ end.
 
 {
   $Log$
+  Revision 1.167  2004/10/01 13:18:41  mattias
+  removed uneeded function TProject.AddNewFile
+
   Revision 1.166  2004/10/01 11:23:07  mattias
   implemented custom project types