From d36d9c7deee6449511feda19dfcd7b5918bc3167 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 27 Jul 2022 23:41:35 +0200
Subject: [PATCH] fcl-base: typo

---
 packages/fcl-base/src/pascodegen.pp | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/packages/fcl-base/src/pascodegen.pp b/packages/fcl-base/src/pascodegen.pp
index 78b8a58d86..138c2867ca 100644
--- a/packages/fcl-base/src/pascodegen.pp
+++ b/packages/fcl-base/src/pascodegen.pp
@@ -198,9 +198,9 @@ end;
 constructor TPascalCodeGenerator.Create(AOwner: TComponent);
 begin
   inherited Create(AOwner);
-  FSource:=TstringList.Create;
+  FSource:=TStringList.Create;
   FLicenseText:=TstringList.Create;
-  FSwitches:=TstringList.Create;
+  FSwitches:=TStringList.Create;
   FSwitches.Add('MODE ObjFPC');
   FSwitches.Add('H+');
   SetLength(FSections,0);
@@ -408,5 +408,3 @@ end;
 
 end.
 
-end.
-