summaryrefslogtreecommitdiff
path: root/src/Gtk/Widgets/Sheet.icl
diff options
context:
space:
mode:
authorCamil Staps2019-10-27 10:09:43 +0100
committerCamil Staps2019-10-27 10:09:43 +0100
commitac446c2e41d7eceda5dea6596a8b08a2a50a9a85 (patch)
tree1ba8a99d2364f49a172d3a1e0ff43d0045940e97 /src/Gtk/Widgets/Sheet.icl
parentAdd DeactivateHandler for GtkSheet (diff)
Add getCellText for GtkSheet
Diffstat (limited to 'src/Gtk/Widgets/Sheet.icl')
-rw-r--r--src/Gtk/Widgets/Sheet.icl3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Gtk/Widgets/Sheet.icl b/src/Gtk/Widgets/Sheet.icl
index 5995f3e..f34aa4b 100644
--- a/src/Gtk/Widgets/Sheet.icl
+++ b/src/Gtk/Widgets/Sheet.icl
@@ -63,6 +63,9 @@ setCellText row col text sheet =
toState (gtk_sheet_set_cell_text sheet row col text) >>|
pure sheet
+getCellText :: !Int !Int !GtkSheet -> GtkM (Maybe String)
+getCellText row col sheet = toStateR (gtk_sheet_cell_get_text sheet row col)
+
setColumnJustification :: !GtkJustification !Int !GtkSheet -> GtkM GtkSheet
setColumnJustification justification col sheet =
toState (gtk_sheet_column_set_justification sheet col (toInt justification)) >>|