aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout/Gaps.hs
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Layout/Gaps.hs')
-rw-r--r--XMonad/Layout/Gaps.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/XMonad/Layout/Gaps.hs b/XMonad/Layout/Gaps.hs
index 76dd57c..f672ea5 100644
--- a/XMonad/Layout/Gaps.hs
+++ b/XMonad/Layout/Gaps.hs
@@ -38,6 +38,7 @@ import Graphics.X11 (Rectangle(..))
import XMonad.Layout.LayoutModifier
import XMonad.Util.Types (Direction2D(..))
+import XMonad.Util.XUtils (fi)
import Data.List (delete)
@@ -133,9 +134,6 @@ toggleGap conf cur d | d `elem` cur = delete d cur
incGap :: GapSpec -> Direction2D -> Int -> GapSpec
incGap gs d i = map (\(dir,j) -> if dir == d then (dir,max (j+i) 0) else (dir,j)) gs
-fi :: (Num b, Integral a) => a -> b
-fi = fromIntegral
-
-- | Add togglable manual gaps to a layout.
gaps :: GapSpec -- ^ The gaps to allow, paired with their initial sizes.
-> l a -- ^ The layout to modify.