diff options
Diffstat (limited to 'src/Rahm/Desktop/Keys')
| -rw-r--r-- | src/Rahm/Desktop/Keys/Wml.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Rahm/Desktop/Keys/Wml.hs b/src/Rahm/Desktop/Keys/Wml.hs index 86bc921..d3e741b 100644 --- a/src/Rahm/Desktop/Keys/Wml.hs +++ b/src/Rahm/Desktop/Keys/Wml.hs @@ -518,13 +518,13 @@ readNextWorkspace = winLocation <- W.findWindow ws win justWorkspaceWithPreferredWindow win . W.tag <$> W.getLocationWorkspace winLocation - -- The accompaning worksapce to the next read workspace. + -- The accompanying worksapce to the next read workspace. (_, _, "~") -> - justWorkspace . accompaningWorkspace <$> readNextWorkspaceName - -- The accompaning workspace to the current workspace (equivalent to ~.) + justWorkspace . accompanyingWorkspace <$> readNextWorkspaceName + -- The accompanying workspace to the current workspace (equivalent to ~.) (_, _, " ") -> liftXToFeed $ - justWorkspace . accompaningWorkspace <$> getCurrentWorkspace + justWorkspace . accompanyingWorkspace <$> getCurrentWorkspace -- The balck hole workspace (_, _, "_") -> return blackHoleWorkspace |