From a105dce7cea116acee420ca40310a8bf6d96a653 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 17 Aug 2002 23:41:12 +0000
Subject: [PATCH] fixed transient windows

git-svn-id: trunk@2276 -
---
 lcl/interfaces/gtk/gtkproc.inc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/gtk/gtkproc.inc b/lcl/interfaces/gtk/gtkproc.inc
index 3f5e67f44c..299b1d5346 100644
--- a/lcl/interfaces/gtk/gtkproc.inc
+++ b/lcl/interfaces/gtk/gtkproc.inc
@@ -1023,8 +1023,9 @@ var
   AFilterEntry: PFileSelFilterEntry;
   i: integer;
 begin
-  if (ADialog=nil) or (ADialog.Handle=0) then exit;
+  if (ADialog=nil) or (not ADialog.HandleAllocated) then exit;
   DlgWindow:=PGtkWidget(ADialog.Handle);
+  gtk_window_set_transient_for(PGtkWindow(DlgWindow),nil);
   if ADialog is TOpenDialog then begin
   
     // free history
@@ -3992,6 +3993,9 @@ end;
  { =============================================================================
 
   $Log$
+  Revision 1.162  2003/03/15 09:42:50  mattias
+  fixed transient windows
+
   Revision 1.161  2003/03/09 21:13:32  mattias
   localized gtk interface