From 49387859d56641e55fd2c6b65c632033cec53a81 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Thu, 24 Oct 2019 08:57:06 +0200
Subject: Add GtkJustification for columns of GtkSheet

---
 src/Gtk/Widgets/Sheet/Internal.icl | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/Gtk/Widgets/Sheet/Internal.icl')

diff --git a/src/Gtk/Widgets/Sheet/Internal.icl b/src/Gtk/Widgets/Sheet/Internal.icl
index 11f5f5a..9cb4a83 100644
--- a/src/Gtk/Widgets/Sheet/Internal.icl
+++ b/src/Gtk/Widgets/Sheet/Internal.icl
@@ -88,6 +88,11 @@ where
 		ccall gtk_sheet_set_column_title "pIs:V:A"
 	}
 
+gtk_sheet_column_set_justification :: !Pointer !Int !Int !.a -> .a
+gtk_sheet_column_set_justification sheet col setting env = code {
+	ccall gtk_sheet_column_set_justification "pII:V:A"
+}
+
 gtk_sheet_columns_set_resizable :: !Pointer !Bool !.a -> .a
 gtk_sheet_columns_set_resizable sheet setting env = code {
 	ccall gtk_sheet_columns_set_resizable "pI:V:A"
-- 
cgit v1.2.3