Wed Oct 31 06:47:17 PDT 2007 Bertram Felgenhauer <in...@gm...>
* GLDrawingArea: provide implementation for GObjectClass
Without this patch, trying to use a GLDrawingArea results in
program: gtkglext/Graphics/UI/Gtk/OpenGL/DrawingArea.chs:73:0: No instance nor default method for class operation System.Glib.Types.toGObject
hunk ./gtkglext/Graphics/UI/Gtk/OpenGL/DrawingArea.chs 74
-instance GObjectClass GLDrawingArea
+instance GObjectClass GLDrawingArea where
+ toGObject (GLDrawingArea gd) = toGObject gd
+ unsafeCastGObject = GLDrawingArea . unsafeCastGObject
|
