From 4731e18842688c6b985f188d648ea1e104be2d18 Mon Sep 17 00:00:00 2001
From: Jannick Kremer <jannick.kremer@mailbox.org>
Date: Mon, 29 Jul 2024 10:21:31 +0100
Subject: [PATCH] Remove Travis CI workarounds

---
 src/base/TextGL.pas | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/base/TextGL.pas b/src/base/TextGL.pas
index 0a8f9b60a..ec15517d5 100644
--- a/src/base/TextGL.pas
+++ b/src/base/TextGL.pas
@@ -136,12 +136,10 @@ procedure LoadFontFamilyNames;
   SetLength(FontFamilyNames, 0);
   for FontNameIndex := 0 to FontSections.Count-1 do
   begin
-    //if (Sections[FontNameIndex].StartsWith('Font_')) then // .StartsWith() does not compile on Travis-CI
-    if (LeftStr(FontSections[FontNameIndex], 5) = 'Font_') then
+    if (FontSections[FontNameIndex].StartsWith('Font_')) then
       begin
         SetLength(FontFamilyNames, Length(FontFamilyNames) + 1);
-        //FontFamilyNames[FontNameIndex] := FontIni.ReadString(Sections[FontNameIndex], 'Name', Sections[FontNameIndex].Remove(0, 5)); // .Remove() does not compile on Travis-CI
-        FontFamilyNames[FontNameIndex] := FontIni.ReadString(FontSections[FontNameIndex], 'Name', Copy(FontSections[FontNameIndex], 5));
+        FontFamilyNames[FontNameIndex] := FontIni.ReadString(FontSections[FontNameIndex], 'Name', FontSections[FontNameIndex].Remove(0, 5));
       end;
   end;