4VZKUDKGREGRTRYWSPLUEFJZQFWFSFTKVGKENUGBQHVRG3K5JHHQC GYCQG6LZQ3CALPOMOGV4KWDDYSWHQHMANY47O4AFARFVTU7DPCNQC LLW2FQPVXSBPFNZ3AHXRNLKNPV626QR32TTW53YHTKJTWK2YOUMAC IMMB6ZKLCUL7UEXN4RGAGXWFIEOAYGBZ73C3R3G2XZX72D4RFMBAC YR2TRQQAEELAEJLABFCOMUZRYEQE5Q5NIGQFQHQKB7MWM63JZUPQC RCTW4VQVWMZEYSBORRWDV6OPIE63XTYOWYZUADF37S26CLQSBVBQC XPUW7ZNKIKNUQSCPNU3DT4W4ADHJY3XN5FSK2SNJWLUDVCWIVP5QC changeLayout :: Maybe String -> X ()changeLayout a =case a ofJust r -> sendMessage $ JumpToLayout r_ -> error "this shouldn't happen"
--changeLayout :: Maybe String -> X ()--changeLayout a =-- case a of-- Just r -> sendMessage $ JumpToLayout r-- _ -> error "this shouldn't happen"
copyNSwitch windows target = dowindows $ copy targetwindows $ W.greedyView target
copyNSwitch :: forall l a s sd a1. (Eq s, Eq a) => ((StackSet String l a s sd -> StackSet String l a s sd) -> X a1)-> String -> X ()copyNSwitch ws target = dows $ copy targetws $ W.greedyView target
shiftNSwitch windows target = dowindows $ shift targetwindows $ W.greedyView target
shiftNSwitch :: forall l a s sd a1. (Eq s, Ord a) => ((StackSet String l a s sd -> StackSet String l a s sd) -> X a1)-> String -> X ()shiftNSwitch ws target = dows $ shift targetws $ W.greedyView target
autocmd BufRead,BufNewFile *.css,*.scss,*.less setlocal foldmethod=marker foldmarker={,}