From d7b28125dac83c5f4150a1a07a7307a41c5fa7d7 Mon Sep 17 00:00:00 2001 From: tv Date: Thu, 9 Oct 2025 01:47:47 +0200 Subject: xmonad-tv: drop spawnRootTerm --- pkgs/haskell/xmonad-tv/src/main.hs | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) (limited to 'pkgs') diff --git a/pkgs/haskell/xmonad-tv/src/main.hs b/pkgs/haskell/xmonad-tv/src/main.hs index 1bbf4cf..889038b 100644 --- a/pkgs/haskell/xmonad-tv/src/main.hs +++ b/pkgs/haskell/xmonad-tv/src/main.hs @@ -140,14 +140,6 @@ forkFile path args env = void . xfork $ do executeFile path True args (env <> Just environment) -spawnRootTerm :: X () -spawnRootTerm = - forkFile - {-pkg:alacritty-tv-}"alacritty" - ["--profile=root", "-e", "/run/wrappers/bin/su", "-"] - Nothing - - myKeys :: XConfig Layout -> Map (KeyMask, KeySym) (X ()) myKeys conf = Map.fromList $ [ ((_4 , xK_Escape ), forkFile {-pkg-}"slock" [] Nothing) @@ -159,7 +151,7 @@ myKeys conf = Map.fromList $ , ((_4C , xK_p ), forkFile {-pkg:fzmenu-}"passmenu" ["--phase2-method=copy"] Nothing) , ((_4 , xK_x ), forkFile {-pkg:alacritty-tv-}"alacritty" ["--dtach", "--singleton"] Nothing) - , ((_4C , xK_x ), spawnRootTerm) + , ((_4C , xK_x ), forkFile {-pkg:alacritty-tv-}"alacritty" ["--profile=root", "-e", "/run/wrappers/bin/su", "-"] Nothing) , ((_C , xK_Menu ), toggleWS) -- cgit v1.2.3