From f738860d69a382965488065dbc1386fa1f28957b Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Mon, 21 Oct 2019 20:17:56 +0200 Subject: Remove usage of import qualified as, which relies on the itask compiler --- src/Gtk/Widgets/Sheet.icl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'src/Gtk/Widgets') diff --git a/src/Gtk/Widgets/Sheet.icl b/src/Gtk/Widgets/Sheet.icl index fe3eb93..442f67d 100644 --- a/src/Gtk/Widgets/Sheet.icl +++ b/src/Gtk/Widgets/Sheet.icl @@ -12,7 +12,7 @@ import Control.Monad.State import System._Pointer import Gtk -import qualified Gtk.Widgets.Sheet.Internal as I +import Gtk.Widgets.Sheet.Internal :: GtkSheet :== Pointer @@ -21,28 +21,28 @@ instance gtkContainer GtkSheet where gtkContainer s = fromPtr s newSheet :: !Int !Int !String -> GtkM GtkSheet newSheet nrows ncols title = - toStateR ('I'.gtk_sheet_new nrows ncols title) >>= show + toStateR (gtk_sheet_new nrows ncols title) >>= show instance tune GtkSheet GtkSheetColumnResizability where tune setting sheet = - toState ('I'.gtk_sheet_columns_set_resizable sheet setting=:ColumnsResizable) >>| + toState (gtk_sheet_columns_set_resizable sheet setting=:ColumnsResizable) >>| pure sheet instance tune GtkSheet GtkSheetColumnSensitity where tune setting sheet = - toState ('I'.gtk_sheet_columns_set_sensitivity sheet setting=:ColumnsSensitive) >>| + toState (gtk_sheet_columns_set_sensitivity sheet setting=:ColumnsSensitive) >>| pure sheet instance tune GtkSheet GtkSheetRowResizability where tune setting sheet = - toState ('I'.gtk_sheet_rows_set_resizable sheet setting=:RowsResizable) >>| + toState (gtk_sheet_rows_set_resizable sheet setting=:RowsResizable) >>| pure sheet instance tune GtkSheet GtkSheetRowSensitity where tune setting sheet = - toState ('I'.gtk_sheet_rows_set_sensitivity sheet setting=:RowsSensitive) >>| + toState (gtk_sheet_rows_set_sensitivity sheet setting=:RowsSensitive) >>| pure sheet -- cgit v1.2.3