From e3d13b491c5b8f1d4fe0f41ddc2ce3e6b7d2ff46 Mon Sep 17 00:00:00 2001 From: Josh Rahm Date: Fri, 7 Mar 2025 17:40:16 -0700 Subject: Misspelling: accompaning -> accompanying --- src/Rahm/Desktop/Keys.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'src/Rahm/Desktop/Keys.hs') diff --git a/src/Rahm/Desktop/Keys.hs b/src/Rahm/Desktop/Keys.hs index 9a6d895..4848998 100644 --- a/src/Rahm/Desktop/Keys.hs +++ b/src/Rahm/Desktop/Keys.hs @@ -120,7 +120,7 @@ import Rahm.Desktop.Theater ) import Rahm.Desktop.WorkspaceWheel (displayWorkspaceWheel, displayWorkspaceWheelAtPoint, displayWorkspaceWheelInCenter) import Rahm.Desktop.Workspaces - ( accompaningWorkspace, + ( accompanyingWorkspace, next, prev, viewAdjacent, @@ -447,7 +447,7 @@ bindings = do \(: The previous workspace.\n\t\t\ \}: The workspace on the screen to the right\n\t\t\ \{: The workspace on the screen to the left\n\t\t\ - \: The accompaningWorkspace (toggled case)\n\t\t\ + \: The accompanyingWorkspace (toggled case)\n\t\t\ \/: Prompt to select a window, and reference that workspace\n\t\t\ \^: The first populated workspace\n\t\t\ \$: The last populated workspace\n\t\t\ @@ -1176,9 +1176,9 @@ bindings = do subbind $ do bind button13 $ noMod $ - doc "Goto the accompaning workspace to the current one." $ + doc "Goto the accompanying workspace to the current one." $ noWindow $ - gotoWorkspace . accompaningWorkspace =<< getCurrentWorkspace + gotoWorkspace . accompanyingWorkspace =<< getCurrentWorkspace bind button15 $ do noMod $ -- cgit