remove unnecessary finalization (GTK+ 2)

Remove a misguided attempt to improve finaliation while
making GTK+ 3 changes, although this change affected only
GTK+ 2.
This commit is contained in:
Matthew Flatt 2015-08-18 10:28:31 -06:00
parent ef07121b9f
commit 1c65d669f3

View File

@ -118,7 +118,6 @@
(gdk_x11_window_get_xid cwin) (gdk_x11_window_get_xid cwin)
(* s x) (* s y) (* s w) (* s h) 0 0 0))] (* s x) (* s y) (* s w) (* s h) 0 0 0))]
[else [else
(as-gtk-window-allocation
(gdk_window_new cwin (make-GdkWindowAttr (gdk_window_new cwin (make-GdkWindowAttr
"" ""
0 0
@ -129,7 +128,7 @@
#f #f
"" "" #f 0) "" "" #f 0)
(bitwise-ior GDK_WA_X (bitwise-ior GDK_WA_X
GDK_WA_Y)))])) GDK_WA_Y))]))
(define (free-gc-window win) (define (free-gc-window win)
(cond (cond