Skip to content

Commit 114b5d4

Browse files
author
Mitsutoshi Aoe
committed
System.Glib.GError and Control.Monad are used only for non-windows platforms
1 parent bee434e commit 114b5d4

File tree

1 file changed

+5
-2
lines changed

1 file changed

+5
-2
lines changed

GUI/GtkExtras.hs

Lines changed: 5 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -6,17 +6,20 @@ module GUI.GtkExtras where
66

77
import Graphics.UI.GtkInternals
88
import Graphics.UI.Gtk (Rectangle)
9-
import System.Glib.GError
109
import System.Glib.MainLoop
1110
import Graphics.Rendering.Pango.Types
1211
import Graphics.Rendering.Pango.BasicTypes
1312
import Graphics.UI.Gtk.General.Enums (StateType, ShadowType)
1413

1514
import Foreign
1615
import Foreign.C
17-
import Control.Monad
1816
import Control.Concurrent.MVar
1917

18+
#if !(mingw32_HOST_OS || mingw32_TARGET_OS)
19+
import System.Glib.GError
20+
import Control.Monad
21+
#endif
22+
2023
waitGUI :: IO ()
2124
waitGUI = do
2225
resultVar <- newEmptyMVar

0 commit comments

Comments
 (0)