summaryrefslogtreecommitdiff
path: root/src/Gtk/Tune.icl
diff options
context:
space:
mode:
authorCamil Staps2019-10-21 08:57:56 +0200
committerCamil Staps2019-10-21 08:57:56 +0200
commit5165b27ba2a1bb2129788a2e1de310ee6a347e4d (patch)
treeffc504b7844e47cced682bc38725bc74f7629673 /src/Gtk/Tune.icl
parentAdd tune class for margins (diff)
Add CSS support
Diffstat (limited to 'src/Gtk/Tune.icl')
-rw-r--r--src/Gtk/Tune.icl7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Gtk/Tune.icl b/src/Gtk/Tune.icl
index 26a05f3..c5846af 100644
--- a/src/Gtk/Tune.icl
+++ b/src/Gtk/Tune.icl
@@ -13,3 +13,10 @@ where
widgetf >>= \widget ->
setMargins margins widget >>|
pure widget
+
+instance tune w GtkCSSClass | gtkWidget w
+where
+ tune widgetf cls =
+ widgetf >>= \widget ->
+ addCSSClass cls widget >>|
+ pure widget