diff options
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 07789df..4bdf2ac 100644 --- a/src/Gtk/Widgets/Sheet.icl +++ b/src/Gtk/Widgets/Sheet.icl @@ -53,6 +53,11 @@ setCellText row col text sheet = toState (gtk_sheet_set_cell_text sheet row col text) >>| pure sheet +setCSSClassForRange :: !GtkCSSClass !(!Int,!Int) !(!Int,!Int) !GtkSheet -> GtkM GtkSheet +setCSSClassForRange (Class cls) top_left bottom_right sheet = + toState (gtk_sheet_range_set_css_class sheet top_left bottom_right cls) >>| + pure sheet + getActiveCell :: !GtkSheet -> GtkM (Maybe (Int,Int)) getActiveCell sheet = toStateR (gtk_sheet_get_active_cell sheet) >>= \cell=:(row,col) |