aboutsummaryrefslogtreecommitdiff
path: root/.config/XMonad/lib/Util.hs
blob: e3bce040dc22abd2eabfe8cf40c3d4e00fe035f0 (plain)
1
2
3
4
5
module Util where

wsKeys :: [a] -> [b] -> [(a, b)]
wsKeys [] [] = []
wsKeys (w:ws) (k:ks) = [(w, k)] ++ wsKeys ws ks