mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 11:30:22 -07:00
10 lines
263 B
Haskell
10 lines
263 B
Haskell
module ManageDocks where
|
|
import XMonad ( Rectangle )
|
|
import XMonad.Hooks.ManageDocks
|
|
|
|
prop_r2c_c2r :: RectC -> Bool
|
|
prop_r2c_c2r r = r2c (c2r r) == r
|
|
|
|
prop_c2r_r2c :: Rectangle -> Bool
|
|
prop_c2r_r2c r = c2r (r2c r) == r
|