diff options
author | Camil Staps | 2019-10-30 19:46:22 +0100 |
---|---|---|
committer | Camil Staps | 2019-10-30 19:46:22 +0100 |
commit | 0d02a6b850e51f1e6e6efa438901a816b62e009d (patch) | |
tree | db58388122509960991cb5eb22c2cf2afd180e76 /src/Gtk/Widgets/Sheet.icl | |
parent | Add GtkEntryCompletion (diff) |
Add getEntry for GtkSheet
Diffstat (limited to 'src/Gtk/Widgets/Sheet.icl')
-rw-r--r-- | src/Gtk/Widgets/Sheet.icl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Gtk/Widgets/Sheet.icl b/src/Gtk/Widgets/Sheet.icl index 521e3ee..36d0b4d 100644 --- a/src/Gtk/Widgets/Sheet.icl +++ b/src/Gtk/Widgets/Sheet.icl @@ -102,6 +102,11 @@ setActiveCell row col sheet=:(GtkSheet s) = toState (gtk_sheet_set_active_cell s row col) >>| pure sheet +getEntry :: !GtkSheet -> GtkM GtkEntry +getEntry (GtkSheet s) = + toStateR (gtk_sheet_get_entry s) >>= \e -> + pure (GtkEntry e) + instance tune GtkSheet GtkSheetColumnResizability where tune setting sheet=:(GtkSheet s) = |