mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 11:30:22 -07:00
workspacesSorted: fix indentation + add comment
This commit is contained in:
parent
9f9b5d3748
commit
43673b3907
@ -67,9 +67,9 @@ appropriate one, or cover your bases by using instead something like:
|
|||||||
For detailed instructions on editing your key bindings, see
|
For detailed instructions on editing your key bindings, see
|
||||||
"XMonad.Doc.Extending#Editing_key_bindings". -}
|
"XMonad.Doc.Extending#Editing_key_bindings". -}
|
||||||
|
|
||||||
|
-- | Get the list of workspaces sorted by their tag
|
||||||
workspacesSorted :: Ord i => W.StackSet i l a s sd -> [W.Workspace i l a]
|
workspacesSorted :: Ord i => W.StackSet i l a s sd -> [W.Workspace i l a]
|
||||||
workspacesSorted s = L.sortBy (\u t -> W.tag u `compare` W.tag t) $
|
workspacesSorted s = L.sortBy (\u t -> W.tag u `compare` W.tag t) $ W.workspaces s
|
||||||
W.workspaces s
|
|
||||||
|
|
||||||
-- | Get a list of all windows in the 'StackSet' with an absolute ordering of workspaces
|
-- | Get a list of all windows in the 'StackSet' with an absolute ordering of workspaces
|
||||||
allWindowsSorted :: Ord i => Eq a => W.StackSet i l a s sd -> [a]
|
allWindowsSorted :: Ord i => Eq a => W.StackSet i l a s sd -> [a]
|
||||||
|
Loading…
x
Reference in New Issue
Block a user