From 5f2e0c0ffec13592d37082aeb98e89b366f9038e Mon Sep 17 00:00:00 2001
From: Paulo Meira <10246101+PMeira@users.noreply.github.com>
Date: Mon, 17 Jul 2023 13:52:15 -0300
Subject: [PATCH] LineCode: fix issue in DumpProperties

---
 src/General/LineCode.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/General/LineCode.pas b/src/General/LineCode.pas
index 0ecbb5ea5..cd79d9cba 100644
--- a/src/General/LineCode.pas
+++ b/src/General/LineCode.pas
@@ -534,7 +534,7 @@ procedure TLineCodeObj.DumpProperties(F: TFileStream; Complete: Boolean; Leaf: B
         for  k := 1 to NumAmpRatings do
             TempStr := TempStr + floattoStrf(AmpRatings[k - 1], ffGeneral, 8, 4) + ',';
         TempStr := TempStr + ']';
-        FSWriteln(F, Format('~ %s=%s', [PropertyName[26]]) + TempStr);
+        FSWriteln(F, Format('~ %s=%s', [PropertyName[26], TempStr]));
         FSWriteln(F, Format('~ %s=%s', [PropertyName[27], PropertyValue[27]]));
     end;
 end;