|
|
|
@ -6,6 +6,7 @@ import qualified Data.Map as M
|
|
|
|
|
|
|
|
|
|
import XMonad.Hooks.DynamicLog
|
|
|
|
|
import XMonad.Hooks.ManageDocks
|
|
|
|
|
import XMonad.Hooks.ManageHelpers (doFullFloat, isFullscreen)
|
|
|
|
|
|
|
|
|
|
import XMonad.Util.Run (spawnPipe) -- for spawnPipe and hPutStrLn
|
|
|
|
|
import qualified System.IO
|
|
|
|
@ -24,6 +25,7 @@ myModMask = mod4Mask -- command
|
|
|
|
|
myManageHook = composeAll
|
|
|
|
|
[ resource =? "visimeet" --> doFloat
|
|
|
|
|
, resource =? "feh" --> doFloat
|
|
|
|
|
, isFullscreen --> doFullFloat
|
|
|
|
|
]
|
|
|
|
|
|
|
|
|
|
--myWorkspaces = [ "!" , "@" , "#" , "$" , "%", "^^", "&", "*", "(" ]
|
|
|
|
|