Updated to tk 8.4.1

[pf3gnuchains/sourceware.git] / tk / macosx / tkMacOSXWm.c

diff --git a/tk/macosx/tkMacOSXWm.c b/tk/macosx/tkMacOSXWm.c
index f55b7b0..b845f86 100644 (file)
--- a/tk/macosx/tkMacOSXWm.c
+++ b/tk/macosx/tkMacOSXWm.c
@@ -5214,6 +5214,11 @@ int
 TkpIsWindowFloating(WindowRef wRef)
 {
     WindowClass class;
+
+    if (wRef == NULL) {
+        return 0;
+    }
+    
     GetWindowClass(wRef, &class);
     return (class == kFloatingWindowClass);
 }