From f94ac39b6da891886127dcb4c34c83fdf2420de2 Mon Sep 17 00:00:00 2001
From: Thulio Bittencourt <bittencourtthulio@gmail.com>
Date: Thu, 18 Mar 2021 12:18:23 -0300
Subject: [PATCH] Update Router4D.History.pas
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Remoção de Função não utilizada
---
 src/Router4D.History.pas | 42 ++++++++++++++++++++--------------------
 1 file changed, 21 insertions(+), 21 deletions(-)

diff --git a/src/Router4D.History.pas b/src/Router4D.History.pas
index 1dc718e..0e92f8e 100644
--- a/src/Router4D.History.pas
+++ b/src/Router4D.History.pas
@@ -43,7 +43,7 @@ type
       FListCacheOrder : TList<String>;
       FIndexCache : Integer;
       procedure CreateInstancePersistent( aPath : String);
-      procedure CacheKeyNotify(Sender: TObject; const Key: string; Action: TCollectionNotification);
+      //procedure CacheKeyNotify(Sender: TObject; const Key: string; Action: TCollectionNotification);
     public
       constructor Create;
       destructor Destroy; override;
@@ -233,26 +233,26 @@ begin
   try FListCache2.TryAdd(aKey, CachePersistent); except end;
 end;
 
-procedure TRouter4DHistory.CacheKeyNotify(Sender: TObject; const Key: string;
-  Action: TCollectionNotification);
-begin
-  inherited;
-
-  case Action of
-   cnAdded:
-   begin
-      Self.FListCacheOrder.Add(Key);
-      Self.FIndexCache := Self.FListCacheOrder.Count-1;
-   end;
-
-   cnRemoved:
-   begin
-      Self.FListCacheOrder.Remove(Key);
-      Self.FIndexCache := Self.FListCacheOrder.Count-1;
-   end;
-  end;
-
-end;
+//procedure TRouter4DHistory.CacheKeyNotify(Sender: TObject; const Key: string;
+//  Action: TCollectionNotification);
+//begin
+//  inherited;
+//
+//  case Action of
+//   cnAdded:
+//   begin
+//      Self.FListCacheOrder.Add(Key);
+//      Self.FIndexCache := Self.FListCacheOrder.Count-1;
+//   end;
+//
+//   cnRemoved:
+//   begin
+//      Self.FListCacheOrder.Remove(Key);
+//      Self.FIndexCache := Self.FListCacheOrder.Count-1;
+//   end;
+//  end;
+//
+//end;
 
 constructor TRouter4DHistory.Create;
 begin