История изменений

-- clickable workspaces via dzen/xdotool
myWorkspaces :: [String]
myWorkspaces = map (clickable . show) [1..9]
    where clickable i = "^ca(1,xdotool key super+" ++ i ++ ")" ++ dzenEscape i ++ "^ca()"

-- clickable workspaces via dzen/xdotool
myWorkspaces :: [String]
myWorkspaces = [clickable i (dzenEscape i) | i <- map show [1..9]]
    where clickable a b = "^ca(1,xdotool key super+" ++ a ++ ")" ++ b ++ "^ca()"

-- clickable workspaces via dzen/xdotool
myWorkspaces :: [String]
myWorkspaces = [clickable i (dzenEscape i) | i <- map show [1..9]]
    where clickable a b = "^ca(1,xdotool key super+" ++ a ++ ")" b ++ "^ca()"

-- clickable workspaces via dzen/xdotool
myWorkspaces :: [String]
myWorkspaces = [ "^ca(1,xdotool key super+" ++ i ++ 
                 ")" ++ dzenEscape i ++ "^ca()" | i <- map show [1..9]]