tools.pas: remove "last"

1 files changed, 0 insertions, 6 deletions

diff --git a/tools.pas b/tools.pas
index 312cda3..302b6eb 100644
--- a/tools.pas
+++ b/tools.pas
@@ -35,7 +35,6 @@ type
     constructor create;
     procedure mrProper;
     function add(neu: tDateiMitDatum): longint;
-    function last: tDateiMitDatum;
     function gleicheNamenWie(dmd: tDateienMitDaten): boolean;
     function toString: string; override;
     procedure append(dmd: tDateienMitDaten);
@@ -113,11 +112,6 @@ begin
   istSortiert:=false;
 end;
 
-function tDateienMitDaten.last: tDateiMitDatum;
-begin
-  result:=tDateiMitDatum(inherited last);
-end;
-
 function tDateienMitDaten.gleicheNamenWie(dmd: tDateienMitDaten): boolean;
 var
   i: longint;