From 751043ea4df81e3dab528ba98a8881bd0e475974 Mon Sep 17 00:00:00 2001 From: mattias Date: Tue, 3 Jun 2008 17:47:13 +0000 Subject: [PATCH] gtk1: fixed compilation git-svn-id: trunk@15300 - --- lcl/interfaces/gtk/gtkwsbuttons.pp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lcl/interfaces/gtk/gtkwsbuttons.pp b/lcl/interfaces/gtk/gtkwsbuttons.pp index 06d8f5f76f..489e912aae 100644 --- a/lcl/interfaces/gtk/gtkwsbuttons.pp +++ b/lcl/interfaces/gtk/gtkwsbuttons.pp @@ -422,8 +422,12 @@ begin if (AInfo^.SpaceWidget = nil) and (ALayout in [blGlyphRight, blGlyphBottom]) then begin + {$IFDEF gtk1} + AInfo^.SpaceWidget := gtk_invisible_new; + {$ELSE} // dont use gtk_invisible_new - it cannot have parent AInfo^.SpaceWidget := gtk_image_new; + {$ENDIF} UpdateLayout(AInfo, ALayout, AMargin); end else begin