diff --git a/components/synedit/synhighlighterpas.pp b/components/synedit/synhighlighterpas.pp
index 23ab30754f..96a3e27e10 100644
--- a/components/synedit/synhighlighterpas.pp
+++ b/components/synedit/synhighlighterpas.pp
@@ -128,7 +128,8 @@ const
   // restrict cdecl etc to places where they can be.
   // this needs a better parser
   ProcModifierAllowed: TPascalCodeFoldBlockTypes =
-    [cfbtNone, cfbtProcedure, cfbtProgram, cfbtClassSection, cfbtUnitSection, // unitsection, actually interface only
+    [cfbtNone, cfbtProcedure, cfbtProgram, cfbtClass, cfbtClassSection,
+     cfbtUnitSection, // unitsection, actually interface only
      cfbtVarType, cfbtLocalVarType];
 
 type