From 1c65d669f3c96c63b38ed12de68fb20b50a86474 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 18 Aug 2015 10:28:31 -0600
Subject: [PATCH] remove unnecessary finalization (GTK+ 2)
Remove a misguided attempt to improve finaliation while
making GTK+ 3 changes, although this change affected only
GTK+ 2.
---
gui-lib/mred/private/wx/gtk/gcwin.rkt | 23 +++++++++++------------
1 file changed, 11 insertions(+), 12 deletions(-)
diff --git a/gui-lib/mred/private/wx/gtk/gcwin.rkt b/gui-lib/mred/private/wx/gtk/gcwin.rkt
index 421d4f3c..87dbcfa3 100644
--- a/gui-lib/mred/private/wx/gtk/gcwin.rkt
+++ b/gui-lib/mred/private/wx/gtk/gcwin.rkt
@@ -118,18 +118,17 @@
(gdk_x11_window_get_xid cwin)
(* s x) (* s y) (* s w) (* s h) 0 0 0))]
[else
- (as-gtk-window-allocation
- (gdk_window_new cwin (make-GdkWindowAttr
- ""
- 0
- x y w h
- GDK_INPUT_OUTPUT
- #f #f
- GDK_WINDOW_CHILD
- #f
- "" "" #f 0)
- (bitwise-ior GDK_WA_X
- GDK_WA_Y)))]))
+ (gdk_window_new cwin (make-GdkWindowAttr
+ ""
+ 0
+ x y w h
+ GDK_INPUT_OUTPUT
+ #f #f
+ GDK_WINDOW_CHILD
+ #f
+ "" "" #f 0)
+ (bitwise-ior GDK_WA_X
+ GDK_WA_Y))]))
(define (free-gc-window win)
(cond