From 6ec80c650b62736959240f1e8bac788d1ed65b32 Mon Sep 17 00:00:00 2001
From: Skybuck Flying <skybuck2000@hotmail.com>
Date: Tue, 23 Nov 2021 00:43:11 +0100
Subject: [PATCH] fix 001 gnugettext

---
 src/libraries/gnugettext/gnugettext.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/libraries/gnugettext/gnugettext.pas b/src/libraries/gnugettext/gnugettext.pas
index d4cb39a33..6883bf598 100644
--- a/src/libraries/gnugettext/gnugettext.pas
+++ b/src/libraries/gnugettext/gnugettext.pas
@@ -1,4 +1,4 @@
-{*------------------------------------------------------------------------------
+{*------------------------------------------------------------------------------
   GNU gettext translation system for Delphi, Kylix, C++ Builder and others.
   All parts of the translation system are kept in this unit.
 
@@ -3589,8 +3589,8 @@ procedure TTP_Retranslator.Execute;
   comp:TGnuGettextComponentMarker;
   ppi:PPropInfo;
   //
-  oInstance: tobject;
-  PropName: string;
+ // oInstance: tobject;
+ // PropName: string;
 begin
   for i:=0 to list.Count-1 do begin
     item:=TObject(list.items[i]) as TTP_RetranslatorItem;