From dc004b45f8b499a4c35b08f8e18f641354f9b9d1 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 22 Oct 2019 14:52:47 +0200
Subject: Add custom GtkM state monad with a bind that does not grow the stack

---
 src/Gtk/Widgets/Sheet.dcl | 8 +++++++-
 src/Gtk/Widgets/Sheet.icl | 8 +-------
 2 files changed, 8 insertions(+), 8 deletions(-)

(limited to 'src/Gtk/Widgets')

diff --git a/src/Gtk/Widgets/Sheet.dcl b/src/Gtk/Widgets/Sheet.dcl
index 88197ef..9bec404 100644
--- a/src/Gtk/Widgets/Sheet.dcl
+++ b/src/Gtk/Widgets/Sheet.dcl
@@ -1,6 +1,12 @@
 definition module Gtk.Widgets.Sheet
 
-from Gtk.State import :: State, :: StateT, :: Identity, :: GtkState, :: GtkM
+/**
+ * This module provides support for GtkSheet; a spreadsheet widget. See
+ * https://fpaquet.github.io/gtksheet/ for more details and installation
+ * instructions. Use the 'Gtk with GtkSheet' environment.
+ */
+
+from Gtk.State import :: GtkM
 from Gtk.Tune import class tune
 from Gtk.Widgets import
 	class gtkWidget, :: GtkWidget,
diff --git a/src/Gtk/Widgets/Sheet.icl b/src/Gtk/Widgets/Sheet.icl
index 442f67d..f27d964 100644
--- a/src/Gtk/Widgets/Sheet.icl
+++ b/src/Gtk/Widgets/Sheet.icl
@@ -1,14 +1,8 @@
 implementation module Gtk.Widgets.Sheet
 
-/**
- * This module provides support for GtkSheet; a spreadsheet widget. See
- * https://fpaquet.github.io/gtksheet/ for more details and installation
- * instructions. Use the 'Gtk with GtkSheet' environment.
- */
+import StdEnv
 
 import Control.Monad
-import Control.Monad.Identity
-import Control.Monad.State
 import System._Pointer
 
 import Gtk
-- 
cgit v1.2.3