Replace explicit definition of fi with import from X.Prelude.

thanks to @slotThe.
xmonad · Jan 6, 2024 · c5f19e7 · c5f19e7
1 parent 0fd50aa
commit c5f19e7
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/XMonad/Layout/DecorationEx/DwmGeometry.hs b/XMonad/Layout/DecorationEx/DwmGeometry.hs
@@ -27,6 +27,7 @@ module XMonad.Layout.DecorationEx.DwmGeometry (
   ) where 
 
 import XMonad
+import XMonad.Prelude
 import qualified XMonad.StackSet as W
 import XMonad.Layout.LayoutModifier
 import qualified XMonad.Layout.Decoration as D
@@ -66,9 +67,6 @@ data DwmGeometry a = DwmGeometry {
 instance Default (DwmGeometry a) where
   def = DwmGeometry False 1 20 200
 
-fi :: (Integral a, Num b) => a -> b
-fi = fromIntegral
-
 instance DecorationGeometry DwmGeometry Window where
   describeGeometry _ = "DwmStyle"