diff --git a/lcl/interfaces/gtk/gtklistsl.inc b/lcl/interfaces/gtk/gtklistsl.inc index d6433e2728..bf3a112084 100644 --- a/lcl/interfaces/gtk/gtklistsl.inc +++ b/lcl/interfaces/gtk/gtklistsl.inc @@ -418,6 +418,7 @@ begin ChildWidget := PPointer(PGTKBox(PGtkBin(AItem)^.child)^.Children^.Data)^; gtk_signal_disconnect_by_func( PGtkObject(ChildWidget), TGTKSignalFunc(@gtkListItemToggledCB), AItem); + FreeWidgetInfo(ChildWidget); end; end;