On Tue, Oct 16, 2012 at 11:38:13PM -0700, Jeffrey David Johnson wrote:
Thanks, that's good to know I'm doing things generally right. Maybe a more specific question would help me improve it though... what I'm actually trying to do is make a tabular list of workspace properties like this:
myLayoutHook = avoidStruts $ smartBorders $ format [ ("admin", "~/dotfiles", (Full, tall, Grid, wide)) , ("notes" , "~/notes" , (tall, wide) ) ] where tall = ... wide = ... format = ???
And I can't figure out what the format function should be. Jeff
Perhaps something like (didn't test it): myLayoutHook = avoidStruts $ smartBorders $ format [ ("admin", "~/dotfiles", Full ||| tall ||| Grid ||| wide) , ("notes" , "~/notes" , tall ||| wide) ] where tall = ... wide = ... defaultWorkspace = tall ||| wide -- or whatever format (w:[]) = workspace w format (w:ws) = workspace w ||| format ws workspace (name, dir, layouts) = onWorkspace name layouts defaultWorkspace ||| modWorkspace name (workspaceDir dir) defaultWorkspace Greetings, Daniel