diff options
Diffstat (limited to 'src/Rahm/Desktop/Common.hs')
| -rw-r--r-- | src/Rahm/Desktop/Common.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Rahm/Desktop/Common.hs b/src/Rahm/Desktop/Common.hs index 47156bb..4787598 100644 --- a/src/Rahm/Desktop/Common.hs +++ b/src/Rahm/Desktop/Common.hs @@ -185,7 +185,9 @@ withBorderWidth width ws fn = do return ret gotoWorkspace :: WorkspaceId -> X () -gotoWorkspace wid = windows $ S.greedyView wid +gotoWorkspace wid = do + logs Debug "GotoWorkspace %s" wid + windows $ S.greedyView wid moveLocationToWorkspace :: Location -> WorkspaceId -> X () moveLocationToWorkspace (Location _ (Just win)) wid = |