diff options
author | Tomas Janousek <tomi@nomi.cz> | 2022-02-20 19:33:03 +0000 |
---|---|---|
committer | Tomas Janousek <tomi@nomi.cz> | 2022-02-20 19:57:25 +0000 |
commit | 80b8030505699e9a734ea83423d526d97e0684ec (patch) | |
tree | 3f148e451e63350d4e9f935624849a38761965c3 | |
parent | c09d42e841a7fcf84f3e1bd9f35903f7c78f97f4 (diff) | |
download | xmobar-80b8030505699e9a734ea83423d526d97e0684ec.tar.gz xmobar-80b8030505699e9a734ea83423d526d97e0684ec.tar.bz2 |
Documentation: Drop unused fragment in QueueReader example
Related: https://github.com/jaor/xmobar/issues/571
-rw-r--r-- | doc/window-managers.org | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/doc/window-managers.org b/doc/window-managers.org index 09f7e3e..6403e37 100644 --- a/doc/window-managers.org +++ b/doc/window-managers.org @@ -208,19 +208,6 @@ choice. logWorkspacesToQueue :: STM.TQueue String -> X () logWorkspacesToQueue q = dynamicLogWithPP def { ppOutput = STM.atomically . STM.writeTQueue q } - where - -- Manage the PrettyPrinting configuration here. - ppLayout' :: String -> String - ppLayout' "Spacing Tall" = xpm "layout-spacing-tall" - ppLayout' "Spacing Mirror Tall" = xpm "layout-spacing-mirror" - ppLayout' "Spacing Full" = xpm "layout-full" - ppLayout' x = x - - icon :: String -> String - icon path = "<icon=" ++ path ++ "/>" - - xpm :: String -> String - xpm = icon . (++ ".xpm") #+end_src *** Example for using the DBus IPC interface with XMonad |