diff options
Diffstat (limited to 'src/Gtk/Widgets.icl')
| -rw-r--r-- | src/Gtk/Widgets.icl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/Gtk/Widgets.icl b/src/Gtk/Widgets.icl index a2a0349..adb655e 100644 --- a/src/Gtk/Widgets.icl +++ b/src/Gtk/Widgets.icl @@ -220,6 +220,12 @@ newTextView = getTextBuffer :: !GtkTextView -> GtkTextBuffer getTextBuffer text_view = gtk_text_view_get_buffer text_view +instance tune GtkTextView GtkWrapMode +where + tune mode text_view = + toState (gtk_text_view_set_wrap_mode text_view (toInt mode)) >>| + pure text_view + :: GtkWidget :== Pointer instance gtkWidget GtkWidget where gtkWidget w = w |