LSLeary

module ThenRefocusAfter where

import XMonad
import XMonad.Hooks.RefocusLast (refocusWhen)
import XMonad.Util.NamedScratchpad
  (NamedScratchpads, query, namedScratchpadAction)
import qualified XMonad.StackSet as W

thenRefocusAfter :: Query Bool -> X a -> X a
p `thenRefocusAfter` act = do

fdncred

FZF

Most of this is taken from fzf.fish. A really nice fzf integration with fish-shell.

There's quite a bit of usage of a fish command called commandline. It would be super helpful for porting things like this script if we had such a utility to modify the readline command line buffer.

General Setup

Set the default fzf options

let-env FZF_DEFAULT_OPTS = '--cycle --layout=reverse --border --height=90% --preview-window=wrap --marker="*"'

zenlinux

import XMonad hiding ( (|||) )
import Data.List                   -- clickable workspaces
import Graphics.X11.ExtraTypes.XF86
import System.IO (hPutStrLn)
--import XMonad.Actions.CycleWS      -- nextWS, prevWS
import XMonad.Actions.FloatKeys
import XMonad.Actions.TagWindows
import XMonad.Actions.WindowGo
import XMonad.Actions.WithAll
import XMonad.Hooks.DynamicLog hiding (xmobar, xmobarPP, xmobarColor, sjanssenPP, byorgeyPP)