clean up

Author: exilon

Quick.AutoMapper.pas

@@ -373,7 +373,6 @@ destructor TAutoMapper<TClass1, TClass2>.Destroy;
 
 function TAutoMapper<TClass1, TClass2>.Map(aSrcObj: TClass1): TClass2;
 var
-  objvalue : TValue;
   obj : TObject;
 begin
   obj := aSrcObj as TObject;

Quick.MemoryCache.pas

@@ -500,7 +500,6 @@ procedure TMemoryCache<T>.SetValue(const aKey: string; aValue: T; aExpirationMil
 
 procedure TMemoryCache<T>.SetValue(const aKey: string; aValue: T; aExpirationMilliseconds : Integer; aExpirationDate : TDateTime);
 var
-  serialized : string;
   cacheitem : TCacheEntry;
 begin
   fLock.BeginWrite;