diff --git a/components/lazutils/translations.pas b/components/lazutils/translations.pas
index feb8919a19..c91ac0d3e3 100644
--- a/components/lazutils/translations.pas
+++ b/components/lazutils/translations.pas
@@ -1612,7 +1612,6 @@ begin
       end;
     end;
     Item.Original:=Original;
-    Item.Tag:=FTag;
   end
   else // in this case new item will be added
     FModified := true;
@@ -1684,11 +1683,12 @@ begin
     CurrentItem.Context := Context;
     CurrentItem.Flags := Flags;
     CurrentItem.PreviousID := PreviousID;
-    CurrentItem.Tag := FTag;
     CurrentItem.LineNr := LineNr;
     NewItem := true;
   end;
 
+  CurrentItem.Tag := FTag;
+
   if FoundItem <> nil then
   begin
     if FoundItem.IdentifierLow<>CurrentItem.IdentifierLow then