diff --git a/components/lazutils/translations.pas b/components/lazutils/translations.pas
index ef7a52e913..10c50da007 100644
--- a/components/lazutils/translations.pas
+++ b/components/lazutils/translations.pas
@@ -1602,7 +1602,6 @@ begin
   Item:=TPOFileItem(FIdentifierLowToItem[lowercase(Identifier)]);
   if Item<>nil then begin
     // found, update item value
-    AddToModuleList(Identifier);
 
     if CompareMultilinedStrings(Item.Original, Original)<>0 then begin
       FModified := True;
@@ -1674,6 +1673,8 @@ var
 begin
   NewItem := false;
 
+  AddToModuleList(Identifier);
+
   FoundItem := TPOFileItem(FOriginalToItem.Data[Original]);
 
   if CurrentItem = nil then