summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--doc/window-managers.org13
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