Snoooopy/dtos-dotfiles
1
0
Fork 0
mirror of https://gitlab.com/dwt1/dotfiles.git synced 2026-08-10 18:11:13 +10:00
Code Issues Packages Projects Releases Wiki Activity

Playing with the prompts.

Browse Source
This commit is contained in:
Derek Taylor
2020-05-21 21:39:36 -05:00
parent c717d4d1d9
commit d22949f6fe
1 changed files with 13 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
.xmonad/xmonad.hs
+13 -10
View File
@@ -19,6 +19,7 @@ import XMonad.Prompt.Man
import XMonad.Prompt.Pass import XMonad.Prompt.Pass
import XMonad.Prompt.Shell (shellPrompt) import XMonad.Prompt.Shell (shellPrompt)
import XMonad.Prompt.Ssh import XMonad.Prompt.Ssh
import XMonad.Prompt.XMonad
import Control.Arrow ((&&&),first) import Control.Arrow ((&&&),first)
-- Data -- Data
@@ -179,12 +180,13 @@ dtXPConfig = def
, promptBorderWidth = 1 , promptBorderWidth = 1
, promptKeymap = dtXPKeymap , promptKeymap = dtXPKeymap
, position = Top , position = Top
-- , position = CenteredAt { xpCenterY = 0.3, xpWidth = 0.3 }
, height = 20 , height = 20
, historySize = 256 , historySize = 256
, historyFilter = id , historyFilter = id
, defaultText = [] , defaultText = []
, autoComplete = Just 100000 -- set Just 100000 for .1 sec , autoComplete = Just 100000 -- set Just 100000 for .1 sec
, showCompletionOnTab = True , showCompletionOnTab = False
, searchPredicate = isPrefixOf , searchPredicate = isPrefixOf
, alwaysHighlight = True , alwaysHighlight = True
, maxComplRows = Nothing -- set to Just 5 for 5 rows , maxComplRows = Nothing -- set to Just 5 for 5 rows
@@ -201,9 +203,10 @@ myKeys =
-- Prompts -- Prompts
, ("M-S-<Return>", shellPrompt dtXPConfig) -- Shell Prompt , ("M-S-<Return>", shellPrompt dtXPConfig) -- Shell Prompt
, ("M-S-o", xmonadPrompt dtXPConfig) -- Xmonad Prompt
, ("M-S-s", sshPrompt dtXPConfig) -- Ssh Prompt , ("M-S-s", sshPrompt dtXPConfig) -- Ssh Prompt
, ("M-S-m", manPrompt dtXPConfig) -- Manpage Prompt , ("M-S-m", manPrompt dtXPConfig) -- Manpage Prompt
-- Requires pass to be installed -- The next three bindings require pass to be installed
, ("M1-C-p", passPrompt dtXPConfig) -- Get Passwords Prompt , ("M1-C-p", passPrompt dtXPConfig) -- Get Passwords Prompt
, ("M1-C-g", passGeneratePrompt dtXPConfig) -- Generate Passwords Prompt , ("M1-C-g", passGeneratePrompt dtXPConfig) -- Generate Passwords Prompt
, ("M1-C-r", passRemovePrompt dtXPConfig) -- Remove Passwords Prompt , ("M1-C-r", passRemovePrompt dtXPConfig) -- Remove Passwords Prompt
@@ -437,6 +440,14 @@ main = do
-- the xmonad, ya know...what the WM is named after! -- the xmonad, ya know...what the WM is named after!
xmonad $ ewmh desktopConfig xmonad $ ewmh desktopConfig
{ manageHook = ( isFullscreen --> doFullFloat ) <+> myManageHook <+> manageHook desktopConfig <+> manageDocks { manageHook = ( isFullscreen --> doFullFloat ) <+> myManageHook <+> manageHook desktopConfig <+> manageDocks
, modMask = myModMask
, terminal = myTerminal
, startupHook = myStartupHook
, layoutHook = myLayoutHook
, workspaces = myWorkspaces
, borderWidth = myBorderWidth
, normalBorderColor = "#292d3e"
, focusedBorderColor = "#bbc5ff"
, logHook = dynamicLogWithPP xmobarPP , logHook = dynamicLogWithPP xmobarPP
{ ppOutput = \x -> hPutStrLn xmproc0 x >> hPutStrLn xmproc1 x >> hPutStrLn xmproc2 x { ppOutput = \x -> hPutStrLn xmproc0 x >> hPutStrLn xmproc1 x >> hPutStrLn xmproc2 x
, ppCurrent = xmobarColor "#c3e88d" "" . wrap "[" "]" -- Current workspace in xmobar , ppCurrent = xmobarColor "#c3e88d" "" . wrap "[" "]" -- Current workspace in xmobar
@@ -449,13 +460,5 @@ main = do
, ppExtras = [windowCount] -- # of windows current workspace , ppExtras = [windowCount] -- # of windows current workspace
, ppOrder = \(ws:l:t:ex) -> [ws,l]++ex++[t] , ppOrder = \(ws:l:t:ex) -> [ws,l]++ex++[t]
} }
, modMask = myModMask
, terminal = myTerminal
, startupHook = myStartupHook
, layoutHook = myLayoutHook
, workspaces = myWorkspaces
, borderWidth = myBorderWidth
, normalBorderColor = "#292d3e"
, focusedBorderColor = "#bbc5ff"
} `additionalKeysP` myKeys } `additionalKeysP` myKeys