diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index 88e5c3fe83..0f6cc87ec0 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -1721,6 +1721,7 @@ begin
 
   {%region *** Goto Marks section ***}
   SrcEditMenuSectionMarks:=RegisterIDEMenuSection(SourceEditorMenuRoot, 'Marks section');
+  AParent:=SrcEditMenuSectionMarks;
     // register the Goto Bookmarks Submenu
     SrcEditSubMenuGotoBookmarks:=RegisterIDESubMenu(AParent,
         'Goto bookmarks', uemGotoBookmark,
@@ -1743,6 +1744,7 @@ begin
   {%endregion}
 
   {%region *** Toggle Bookmarks Submenu ***}
+  AParent:=SrcEditMenuSectionMarks;
     SrcEditSubMenuToggleBookmarks:=RegisterIDESubMenu(AParent,
         'Toggle bookmarks', uemToggleBookmark,
         nil, TNotifyProcedure(@TToolButton_ToggleBookmarks.ShowAloneMenu),