mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-07-30 19:51:51 -07:00
.github
XMonad
scripts
tests
CycleRecentWS.hs
ExtensibleConf.hs
Instances.hs
Main.hs
ManageDocks.hs
NoBorders.hs
RotateSome.hs
Selective.hs
SwapWorkspaces.hs
Utils.hs
XPrompt.hs
.gitignore
.mailmap
CHANGES.md
LICENSE
README.md
Setup.lhs
cabal.haskell-ci
cabal.project
stack-master.yaml
stack.yaml
xmonad-contrib.cabal
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
|