aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Hooks
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Hooks')
-rw-r--r--XMonad/Hooks/CurrentWorkspaceOnTop.hs2
-rw-r--r--XMonad/Hooks/DynamicLog.hs10
-rw-r--r--XMonad/Hooks/EwmhDesktops.hs4
-rw-r--r--XMonad/Hooks/FadeInactive.hs2
-rw-r--r--XMonad/Hooks/FadeWindows.hs2
-rw-r--r--XMonad/Hooks/FloatNext.hs2
-rw-r--r--XMonad/Hooks/InsertPosition.hs2
-rw-r--r--XMonad/Hooks/ManageHelpers.hs2
-rw-r--r--XMonad/Hooks/Minimize.hs4
-rw-r--r--XMonad/Hooks/Place.hs4
-rw-r--r--XMonad/Hooks/PositionStoreHooks.hs8
-rw-r--r--XMonad/Hooks/RestoreMinimized.hs2
-rw-r--r--XMonad/Hooks/Script.hs2
-rw-r--r--XMonad/Hooks/ServerMode.hs2
-rw-r--r--XMonad/Hooks/ToggleHook.hs4
-rw-r--r--XMonad/Hooks/UrgencyHook.hs6
-rw-r--r--XMonad/Hooks/WorkspaceByPos.hs4
-rw-r--r--XMonad/Hooks/WorkspaceHistory.hs2
18 files changed, 32 insertions, 32 deletions
diff --git a/XMonad/Hooks/CurrentWorkspaceOnTop.hs b/XMonad/Hooks/CurrentWorkspaceOnTop.hs
index 2c42413..5b94a8d 100644
--- a/XMonad/Hooks/CurrentWorkspaceOnTop.hs
+++ b/XMonad/Hooks/CurrentWorkspaceOnTop.hs
@@ -33,7 +33,7 @@ import qualified Data.Map as M
--
-- > import XMonad.Hooks.CurrentWorkspaceOnTop
-- >
--- > main = xmonad $ defaultConfig {
+-- > main = xmonad $ def {
-- > ...
-- > logHook = currentWorkspaceOnTop
-- > ...
diff --git a/XMonad/Hooks/DynamicLog.hs b/XMonad/Hooks/DynamicLog.hs
index 0547c80..3bdf5f1 100644
--- a/XMonad/Hooks/DynamicLog.hs
+++ b/XMonad/Hooks/DynamicLog.hs
@@ -88,7 +88,7 @@ import XMonad.Hooks.ManageDocks
--
-- > main = xmonad =<< xmobar myConfig
-- >
--- > myConfig = defaultConfig { ... }
+-- > myConfig = def { ... }
--
-- There is also 'statusBar' if you'd like to use another status bar, or would
-- like to use different formatting options. The 'xmobar', 'dzen', and
@@ -99,7 +99,7 @@ import XMonad.Hooks.ManageDocks
-- ('dynamicLog' or 'dynamicLogXinerama') by simply setting your logHook to the
-- appropriate function, for instance:
--
--- > main = xmonad $ defaultConfig {
+-- > main = xmonad $ def {
-- > ...
-- > logHook = dynamicLog
-- > ...
@@ -124,7 +124,7 @@ import XMonad.Hooks.ManageDocks
-- >
-- > main = do
-- > h <- spawnPipe "xmobar -options -foo -bar"
--- > xmonad $ defaultConfig {
+-- > xmonad $ def {
-- > ...
-- > logHook = dynamicLogWithPP $ defaultPP { ppOutput = hPutStrLn h }
--
@@ -153,7 +153,7 @@ import XMonad.Hooks.ManageDocks
--
-- > main = xmonad =<< dzen myConfig
-- >
--- > myConfig = defaultConfig { ... }
+-- > myConfig = def { ... }
--
-- The intent is that the above config file should provide a nice
-- status bar with minimal effort.
@@ -178,7 +178,7 @@ dzen conf = statusBar ("dzen2 " ++ flags) dzenPP toggleStrutsKey conf
--
-- > main = xmonad =<< xmobar myConfig
-- >
--- > myConfig = defaultConfig { ... }
+-- > myConfig = def { ... }
--
-- This works pretty much the same as 'dzen' function above.
--
diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs
index f7f19c3..8b3a644 100644
--- a/XMonad/Hooks/EwmhDesktops.hs
+++ b/XMonad/Hooks/EwmhDesktops.hs
@@ -44,8 +44,8 @@ import XMonad.Util.WindowProperties (getProp32)
-- > import XMonad
-- > import XMonad.Hooks.EwmhDesktops
-- >
--- > main = xmonad $ ewmh defaultConfig{ handleEventHook =
--- > handleEventHook defaultConfig <+> fullscreenEventHook }
+-- > main = xmonad $ ewmh def{ handleEventHook =
+-- > handleEventHook def <+> fullscreenEventHook }
--
-- You may also be interested in 'avoidStruts' from "XMonad.Hooks.ManageDocks".
diff --git a/XMonad/Hooks/FadeInactive.hs b/XMonad/Hooks/FadeInactive.hs
index 71a6fcd..d1e64a6 100644
--- a/XMonad/Hooks/FadeInactive.hs
+++ b/XMonad/Hooks/FadeInactive.hs
@@ -40,7 +40,7 @@ import Control.Monad
-- > myLogHook = fadeInactiveLogHook fadeAmount
-- > where fadeAmount = 0.8
-- >
--- > main = xmonad defaultConfig { logHook = myLogHook }
+-- > main = xmonad def { logHook = myLogHook }
--
-- fadeAmount can be any rational between 0 and 1.
-- you will need to have xcompmgr <http://freedesktop.org/wiki/Software/xapps>
diff --git a/XMonad/Hooks/FadeWindows.hs b/XMonad/Hooks/FadeWindows.hs
index 30e1de4..4b8e62b 100644
--- a/XMonad/Hooks/FadeWindows.hs
+++ b/XMonad/Hooks/FadeWindows.hs
@@ -115,7 +115,7 @@ import Graphics.X11.Xlib.Extras (Event(..))
-- a tight loop trying to fade the popup in). I find it useful to
-- have a key binding to restart the compositing manager; for example,
--
--- main = xmonad $ defaultConfig {
+-- main = xmonad $ def {
-- {- ... -}
-- }
-- `additionalKeysP`
diff --git a/XMonad/Hooks/FloatNext.hs b/XMonad/Hooks/FloatNext.hs
index 93d0eda..f98ea15 100644
--- a/XMonad/Hooks/FloatNext.hs
+++ b/XMonad/Hooks/FloatNext.hs
@@ -53,7 +53,7 @@ hookName = "__float"
--
-- and adding 'floatNextHook' to your 'ManageHook':
--
--- > myManageHook = floatNextHook <+> manageHook defaultConfig
+-- > myManageHook = floatNextHook <+> manageHook def
--
-- The 'floatNext' and 'toggleFloatNext' functions can be used in key
-- bindings to float the next spawned window:
diff --git a/XMonad/Hooks/InsertPosition.hs b/XMonad/Hooks/InsertPosition.hs
index 722c48a..0c6230c 100644
--- a/XMonad/Hooks/InsertPosition.hs
+++ b/XMonad/Hooks/InsertPosition.hs
@@ -31,7 +31,7 @@ import Data.Monoid(Endo(Endo))
-- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@:
--
-- > import XMonad.Hooks.InsertPosition
--- > xmonad defaultConfig { manageHook = insertPosition Master Newer <+> myManageHook }
+-- > xmonad def { manageHook = insertPosition Master Newer <+> myManageHook }
--
-- You should you put the manageHooks that use 'doShift' to take effect
-- /before/ 'insertPosition', so that the window order will be consistent.
diff --git a/XMonad/Hooks/ManageHelpers.hs b/XMonad/Hooks/ManageHelpers.hs
index 093e0cb..de03b55 100644
--- a/XMonad/Hooks/ManageHelpers.hs
+++ b/XMonad/Hooks/ManageHelpers.hs
@@ -13,7 +13,7 @@
--
-- > import XMonad.Hooks.ManageHelpers
-- > main =
--- > xmonad defaultConfig{
+-- > xmonad def{
-- > ...
-- > manageHook = composeOne [
-- > isKDETrayWindow -?> doIgnore,
diff --git a/XMonad/Hooks/Minimize.hs b/XMonad/Hooks/Minimize.hs
index dd9567c..5e2ab03 100644
--- a/XMonad/Hooks/Minimize.hs
+++ b/XMonad/Hooks/Minimize.hs
@@ -33,8 +33,8 @@ import XMonad.Layout.Minimize
-- >
-- > myHandleEventHook = minimizeEventHook
-- > myLayout = minimize (Tall 1 (3/100) (1/2)) ||| Full ||| etc..
--- > main = xmonad defaultConfig { layoutHook = myLayout
--- > , handleEventHook = myHandleEventHook }
+-- > main = xmonad def { layoutHook = myLayout
+-- > , handleEventHook = myHandleEventHook }
minimizeEventHook :: Event -> X All
minimizeEventHook (ClientMessageEvent {ev_window = w,
diff --git a/XMonad/Hooks/Place.hs b/XMonad/Hooks/Place.hs
index 65d3e49..e1138ce 100644
--- a/XMonad/Hooks/Place.hs
+++ b/XMonad/Hooks/Place.hs
@@ -59,8 +59,8 @@ import Control.Monad.Trans (lift)
--
-- and adding 'placeHook' to your 'manageHook', for example:
--
--- > main = xmonad $ defaultConfig { manageHook = placeHook simpleSmart
--- > <+> manageHook defaultConfig }
+-- > main = xmonad $ def { manageHook = placeHook simpleSmart
+-- > <+> manageHook def }
--
-- Note that 'placeHook' should be applied after most other hooks, especially hooks
-- such as 'doFloat' and 'doShift'. Since hooks combined with '<+>' are applied from
diff --git a/XMonad/Hooks/PositionStoreHooks.hs b/XMonad/Hooks/PositionStoreHooks.hs
index 9ebcbb4..0818b1c 100644
--- a/XMonad/Hooks/PositionStoreHooks.hs
+++ b/XMonad/Hooks/PositionStoreHooks.hs
@@ -58,12 +58,12 @@ import qualified Data.Set as S
-- otherwise use 'Just defaultTheme' or similar to inform the module about the
-- decoration theme used.
--
--- > myManageHook = positionStoreManageHook Nothing <+> manageHook defaultConfig
+-- > myManageHook = positionStoreManageHook Nothing <+> manageHook def
-- > myHandleEventHook = positionStoreEventHook
-- >
--- > main = xmonad defaultConfig { manageHook = myManageHook
--- > , handleEventHook = myHandleEventHook
--- > }
+-- > main = xmonad def { manageHook = myManageHook
+-- > , handleEventHook = myHandleEventHook
+-- > }
--
positionStoreManageHook :: Maybe Theme -> ManageHook
diff --git a/XMonad/Hooks/RestoreMinimized.hs b/XMonad/Hooks/RestoreMinimized.hs
index 3759ce5..05aa846 100644
--- a/XMonad/Hooks/RestoreMinimized.hs
+++ b/XMonad/Hooks/RestoreMinimized.hs
@@ -34,7 +34,7 @@ import XMonad.Layout.Minimize
-- >
-- > myHandleEventHook = restoreMinimizedEventHook
-- >
--- > main = xmonad defaultConfig { handleEventHook = myHandleEventHook }
+-- > main = xmonad def { handleEventHook = myHandleEventHook }
data RestoreMinimized = RestoreMinimized deriving ( Show, Read )
diff --git a/XMonad/Hooks/Script.hs b/XMonad/Hooks/Script.hs
index 82e4868..b298920 100644
--- a/XMonad/Hooks/Script.hs
+++ b/XMonad/Hooks/Script.hs
@@ -34,7 +34,7 @@ import XMonad
-- For example, if you wanted to run the hook "startup" in your script every
-- time your startup hook ran, you could modify your xmonad config as such:
--
--- > main = xmonad $ defaultConfig {
+-- > main = xmonad $ def {
-- > ...
-- > startupHook = execScriptHook "startup"
-- > ...
diff --git a/XMonad/Hooks/ServerMode.hs b/XMonad/Hooks/ServerMode.hs
index c072f53..bbe1097 100644
--- a/XMonad/Hooks/ServerMode.hs
+++ b/XMonad/Hooks/ServerMode.hs
@@ -79,7 +79,7 @@ import XMonad.Actions.Commands
--
-- Then edit your @handleEventHook@ by adding the 'serverModeEventHook':
--
--- > main = xmonad defaultConfig { handleEventHook = serverModeEventHook }
+-- > main = xmonad def { handleEventHook = serverModeEventHook }
--
data ServerMode = ServerMode deriving ( Show, Read )
diff --git a/XMonad/Hooks/ToggleHook.hs b/XMonad/Hooks/ToggleHook.hs
index 2b1e611..a497678 100644
--- a/XMonad/Hooks/ToggleHook.hs
+++ b/XMonad/Hooks/ToggleHook.hs
@@ -85,12 +85,12 @@ modify' n f = XS.modify (HookState . setter . hooks)
-- and adding 'toggleHook name hook' to your 'ManageHook' where @name@ is the
-- name of the hook and @hook@ is the hook to execute based on the state.
--
--- > myManageHook = toggleHook "float" doFloat <+> manageHook defaultConfig
+-- > myManageHook = toggleHook "float" doFloat <+> manageHook def
--
-- Additionally, toggleHook' is provided to toggle between two hooks (rather
-- than on/off).
--
--- > myManageHook = toggleHook' "oldfocus" (const id) W.focusWindow <+> manageHook defaultConfig
+-- > myManageHook = toggleHook' "oldfocus" (const id) W.focusWindow <+> manageHook def
--
-- The 'hookNext' and 'toggleHookNext' functions can be used in key
-- bindings to set whether the hook is applied or not.
diff --git a/XMonad/Hooks/UrgencyHook.hs b/XMonad/Hooks/UrgencyHook.hs
index 7ef09b5..06a4910 100644
--- a/XMonad/Hooks/UrgencyHook.hs
+++ b/XMonad/Hooks/UrgencyHook.hs
@@ -106,7 +106,7 @@ import Foreign.C.Types (CLong)
-- 'withUrgencyHook'. For example:
--
-- > main = xmonad $ withUrgencyHook dzenUrgencyHook { args = ["-bg", "darkgreen", "-xs", "1"] }
--- > $ defaultConfig
+-- > $ def
--
-- This will pop up a dzen bar for five seconds telling you you've got an
-- urgent window.
@@ -118,7 +118,7 @@ import Foreign.C.Types (CLong)
-- extra popup, install NoUrgencyHook, as so:
--
-- > main = xmonad $ withUrgencyHook NoUrgencyHook
--- > $ defaultConfig
+-- > $ def
--
-- Now, your "XMonad.Hooks.DynamicLog" must be set up to display the urgent
-- windows. If you're using the 'dzen' or 'dzenPP' functions from that module,
@@ -259,7 +259,7 @@ minutes secs = secs * 60
-- | The default 'UrgencyConfig'. suppressWhen = Visible, remindWhen = Dont.
-- Use a variation of this in your config just as you use a variation of
--- defaultConfig for your xmonad definition.
+-- 'def' for your xmonad definition.
urgencyConfig :: UrgencyConfig
urgencyConfig = UrgencyConfig { suppressWhen = Visible, remindWhen = Dont }
diff --git a/XMonad/Hooks/WorkspaceByPos.hs b/XMonad/Hooks/WorkspaceByPos.hs
index b7f1323..9d577f5 100644
--- a/XMonad/Hooks/WorkspaceByPos.hs
+++ b/XMonad/Hooks/WorkspaceByPos.hs
@@ -33,9 +33,9 @@ import Control.Monad.Error ((<=<),guard,lift,runErrorT,throwError)
--
-- > import XMonad.Hooks.WorkspaceByPos
-- >
--- > myManageHook = workspaceByPos <+> manageHook defaultConfig
+-- > myManageHook = workspaceByPos <+> manageHook def
-- >
--- > main = xmonad defaultConfig { manageHook = myManageHook }
+-- > main = xmonad def { manageHook = myManageHook }
workspaceByPos :: ManageHook
workspaceByPos = (maybe idHook doShift <=< liftX . needsMoving) =<< ask
diff --git a/XMonad/Hooks/WorkspaceHistory.hs b/XMonad/Hooks/WorkspaceHistory.hs
index ed41f42..8080619 100644
--- a/XMonad/Hooks/WorkspaceHistory.hs
+++ b/XMonad/Hooks/WorkspaceHistory.hs
@@ -38,7 +38,7 @@ import qualified XMonad.Util.ExtensibleState as XS
--
-- Then add the hook to your 'logHook':
--
--- > main = xmonad $ defaultConfig
+-- > main = xmonad $ def
-- > { ...
-- > , logHook = ... >> workspaceHistoryHook >> ...
-- > , ...
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-02 12:57:44 +0000