[XMonad] Don't name workspaces by default

This commit is contained in:
Ivan Malison 2017-09-13 16:31:18 -07:00
parent 23ff653304
commit 05814d9dfa
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -233,10 +233,6 @@ hostNameToAction =
myStartup = do myStartup = do
spawn "systemctl --user start wm.target" spawn "systemctl --user start wm.target"
setWorkspaceName "1" "code"
setWorkspaceName "2" "doc"
setWorkspaceName "3" "browse"
setWorkspaceName "4" "watch"
hostName <- io getHostName hostName <- io getHostName
M.findWithDefault (return ()) hostName hostNameToAction M.findWithDefault (return ()) hostName hostNameToAction