diff options
Diffstat (limited to 'src/Gtk/Widgets/Sheet.icl')
| -rw-r--r-- | src/Gtk/Widgets/Sheet.icl | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Gtk/Widgets/Sheet.icl b/src/Gtk/Widgets/Sheet.icl index f8ecabe..521e3ee 100644 --- a/src/Gtk/Widgets/Sheet.icl +++ b/src/Gtk/Widgets/Sheet.icl @@ -82,6 +82,14 @@ setRangeEditable setting top_left bottom_right sheet=:(GtkSheet s) = toState (gtk_sheet_range_set_editable s top_left bottom_right setting) >>| pure sheet +setRowVisibility :: !Bool !Int !GtkSheet -> GtkM GtkSheet +setRowVisibility setting row sheet=:(GtkSheet s) = + toState (gtk_sheet_row_set_visibility s row setting) >>| + pure sheet + +isRowVisible :: !Int !GtkSheet -> GtkM Bool +isRowVisible row (GtkSheet s) = toStateR (gtk_sheet_row_visible s row) + getActiveCell :: !GtkSheet -> GtkM (Maybe (Int,Int)) getActiveCell (GtkSheet s) = toStateR (gtk_sheet_get_active_cell s) >>= \cell=:(row,col) |