diff options
Diffstat (limited to 'src/Gtk/Widgets.icl')
| -rw-r--r-- | src/Gtk/Widgets.icl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Gtk/Widgets.icl b/src/Gtk/Widgets.icl index e485364..4e2f2c4 100644 --- a/src/Gtk/Widgets.icl +++ b/src/Gtk/Widgets.icl @@ -107,6 +107,14 @@ packPane2 :: !w !GtkPaned !GtkResize !GtkShrink -> GtkM () | gtkWidget w packPane2 widget paned resize shrink = toState ('I'.gtk_paned_pack2 paned (gtkWidget widget) resize=:Resize shrink=:Shrink) +:: GtkScrolledWindow :== Pointer + +instance gtkWidget GtkScrolledWindow where gtkWidget sw = sw +instance gtkContainer GtkScrolledWindow where gtkContainer sw = sw + +newScrolledWindow :: GtkM GtkScrolledWindow +newScrolledWindow = toStateR ('I'.gtk_scrolled_window_new 0 0) >>= show + :: GtkTextBuffer :== Pointer insertAtCursor :: !String !GtkTextBuffer -> GtkM () |