enabled golang and other modules in starship, trying to push to this repo after messing everything up

1 files changed, 0 insertions, 426 deletions

diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs
deleted file mode 100644
index 110997d..0000000
--- a/.config/XMonad/xmonad.hs
+++ /dev/null
@@ -1,426 +0,0 @@
-import XMonad
-import qualified XMonad.StackSet as W
-import XMonad.ManageHook
-
--- xmonad-log imports
--- import qualified DBus as D
--- import qualified DBus.Client as D
--- import qualified Codec.Binary.UTF8.String as UTF8
-
--- data
-import Data.Tree
-import qualified Data.Map as M
-
--- actions
-import XMonad.Actions.CycleWS (moveTo, shiftTo, WSType(..), nextScreen, prevScreen)
-import XMonad.Actions.CopyWindow
-import XMonad.Actions.CycleWS
-import XMonad.Actions.GridSelect
-import XMonad.Actions.SwapWorkspaces
-import XMonad.Actions.WindowBringer
-import XMonad.Actions.MouseResize
-import XMonad.Actions.SpawnOn
-import qualified XMonad.Actions.TreeSelect as TS
-
--- layouts modifiers
-import XMonad.Layout.Spacing
-import XMonad.Layout.LayoutModifier
-import XMonad.Layout.WindowNavigation as WN
-import XMonad.Layout.Renamed as R (renamed, Rename(Replace))
-import XMonad.Layout.Maximize
--- import XMonad.Layout.PerWorkspace
-
--- Layouts
-import XMonad.Layout.BinarySpacePartition as BSP
-import XMonad.Layout.Grid
-import XMonad.Layout.ThreeColumns
-import XMonad.Layout.TwoPane
-import XMonad.Layout.ResizableTile
-import XMonad.Layout.Tabbed -- fix this it doesnt work
-import XMonad.Layout.NoBorders
-import XMonad.Layout.Accordion
-import XMonad.Layout.ZoomRow
-
-
--- hooks
-import XMonad.Hooks.SetWMName
-import XMonad.Hooks.ManageDocks
-import XMonad.Hooks.DynamicLog
-import XMonad.Hooks.EwmhDesktops
-
--- utilities
-import XMonad.Util.SpawnOnce
-import XMonad.Util.EZConfig
-import XMonad.Util.Cursor
-import XMonad.Util.Paste
-import XMonad.Util.Run
-import XMonad.Util.NamedScratchpad
-
-
-myStartupHook :: X ()
-myStartupHook = do
-          spawnOnce "start-lemonbar.sh"
-	  spawnOn   "  二  " "firefox"
-	  setWMName "AnimeThighsWM"
-	  -- setWMName "LG3D"
-          setDefaultCursor xC_left_ptr
-
--- defaults
--- myModMask :: KeyMask
-myModMask = mod4Mask 
-
-altMask :: KeyMask
-altMask = mod1Mask
-
-myTerminal :: String
-myTerminal = "st"
-
-myLauncher :: String
-myLauncher = "run_dmenu"
-
-myBrowser :: String
-myBrowser = "brave"
-
-myFileManager :: String
-myFileManager = "pcmanfm"
-
-myEmailClient :: String
-myEmailClient = "thunderbird"
-
-myEditor :: String
-myEditor = "nvim"
-
-myLockscreen :: String
-myLockscreen = "betterlockscreen -l -t 'Yo, Vidhu!'"
-
-myScreenshot :: String
-myScreenshot = "scrot /zt/Screenshots/Screenshot-%Y-%d-%m--%T.png"
-
-myColorPicker :: String
-myColorPicker = "colorpicker --short --one-shot --preview | xsel -b"
-
--- volume
-myVolUp :: String
-myVolUp = "pulseaudio-ctl up && killall lemonblocks -5"
-
-myVolDown :: String
-myVolDown = "pulseaudio-ctl down && killall lemonblocks -5"
-
-myVolMute :: String
-myVolMute = "pulseaudio-ctl mute && killall lemonblocks -5"
-
-
-myFont :: String
-myFont = "xft:Hack:style=Regular:size=12"
-
-
--- wm variables
-
--- fBorder = "#bf00ff"
--- fBorder = "#3804f4"
-fBorder = "#00ff85"
-nBorder = "#130F23"
-
-myBorderWidth = 1
-
-sGap = 1 -- screen gap
-wGap = 2 -- window gap
-
-myExtraWorkspaces = [(xK_0, "  十  ")] -- , (xK_comma, "  十一  "), (xK_period, "  十二  "), (xK_slash, "  十三  ")]
-myWorkspaces = ["  一  ","  二  ","  三  ","  四  ","  五  ","  六  ","  七  ","  八  ", "  九  "] ++ (map snd myExtraWorkspaces)
-
--- treeselect config
-defaultNavigation = M.fromList
-    [ ((0, xK_Escape), TS.cancel)
-    , ((0, xK_Return), TS.select)
-    , ((0, xK_space),  TS.select)
-    , ((0, xK_Up),     TS.movePrev)
-    , ((0, xK_Down),   TS.moveNext)
-    , ((0, xK_Left),   TS.moveParent)
-    , ((0, xK_Right),  TS.moveChild)
-    , ((0, xK_k),      TS.movePrev)
-    , ((0, xK_j),      TS.moveNext)
-    , ((0, xK_h),      TS.moveParent)
-    , ((0, xK_l),      TS.moveChild)
-    , ((0, xK_o),      TS.moveHistBack)
-    , ((0, xK_i),      TS.moveHistForward)
-    ]
-
-myTSConfig = TS.TSConfig { TS.ts_hidechildren = False
-                           , TS.ts_background   = 0xdd282c34
-                           , TS.ts_font         = myFont
-                           , TS.ts_node         = (0xffd0d0d0, 0xff1c1f24)
-                           , TS.ts_nodealt      = (0xffd0d0d0, 0xff282c34)
-                           , TS.ts_highlight    = (0xffffffff, 0xff755999)
-                           , TS.ts_extra        = 0xffd0d0d0
-                           , TS.ts_node_width   = 200
-                           , TS.ts_node_height  = 28
-                           , TS.ts_originX      = 100
-                           , TS.ts_originY      = 100
-                           , TS.ts_indent       = 80
-                           , TS.ts_navigate     = TS.defaultNavigation
-                           }
-
-myTreeMenu :: TS.TSConfig (X ()) -> X ()
-myTreeMenu a = TS.treeselectAction a
-    [ Node (TS.TSNode "Section Screenshot" "Take screenshot of a section on the screen" (spawn "scrot -s /zt/Screenshots/Screenshot-%Y-%d-%m--%T.png")) []
-    , Node (TS.TSNode "Utilities" "" (return()))
-        [ Node (TS.TSNode "Pavucontrol" "" (spawn "pavucontrol")) []
-        , Node (TS.TSNode "Color Picker" "" (spawn myColorPicker)) []
-        , Node (TS.TSNode "bashtop" "" (spawn "st -e bashtop")) []
-        , Node (TS.TSNode "htop" "" (spawn "st -e htop")) []
-        , Node (TS.TSNode "lxappearance" "" (spawn "st -e lxappearance")) []
-	]
-    , Node (TS.TSNode "Apps" "" (return()))
-        [ Node (TS.TSNode "Torrents" "" (spawn "qbittorrent")) []
-        , Node (TS.TSNode "Discord" "" (spawn "discord-canary")) []
-        , Node (TS.TSNode "LibreOffice" "" (spawn "libreoffice")) []
-    	, Node (TS.TSNode "Browsers" "" (return()))
-            [ Node (TS.TSNode "Vivaldi" "" (spawn "vivaldi-stable")) []
-            , Node (TS.TSNode "Firefox" "" (spawn "firefox")) []
-            , Node (TS.TSNode "Brave" "" (spawn "brave")) []
-	    ]
-	]
-    , Node (TS.TSNode "Other" "" (return()))
-        [ Node (TS.TSNode "Recompile XMonad" "Recompile and restart the window manager" (spawn "xmonad --recompile && xmonad --restart")) []
-        , Node (TS.TSNode "Launch DMenu" "just in case the keybinding doesn't work" (spawn "run_dmenu")) []
-        , Node (TS.TSNode "Restart server" "Restart startpage server" (spawn "killall startpage-server;startpage-server")) []
-        , Node (TS.TSNode "notify" "send a notification" (spawn "notify-send 'This is a notification' 'Hello World!'")) []
-	]
-    , Node (TS.TSNode "Power" "" (return()))
-        [ Node (TS.TSNode "Shutdown" "It's not like I'll miss you b- baka!" (spawn "shutdown now")) []
-        , Node (TS.TSNode "Reboot" "What are you doing!" (spawn "reboot")) []
-        , Node (TS.TSNode "Cancel" "Yamete kudasai" (return())) []
-	]
-    ]
-
-
-
--- scratchpad config
-myScratchpads = [
-	 NS "Phone" "scrcpy" (title =? "Motorola One Power") defaultFloating,
-	 NS "Terminal" "st -t 'TerminalScratchpad'" (title =? "TerminalScratchpad") defaultFloating,
-	 NS "Nitrogen" "nitrogen" (title =? "Nitrogen") defaultFloating
-         ] where role = stringProperty "WM_WINDOW_ROLE"
-
-
--- keybindings
-myKeys = [
-         ((myModMask, xK_Return), spawn (myTerminal))
-	 , ((myModMask .|. shiftMask, xK_Return), spawn (myScreenshot))
-	 , ((myModMask, xK_q), spawn (myLockscreen))
-	 , ((myModMask, xK_n), spawn ("dunstctl close-all"))
-
-         , ((altMask, xK_w), kill1)
-         , ((myModMask, xK_a), withFocused $ windows . W.sink) -- unfloat windows
-
-         -- launch apps/execute scripts
-         , ((myModMask, xK_o), spawn (myFileManager))
-         , ((myModMask, xK_y), spawn ("gimp"))
-         , ((myModMask, xK_e), spawn (myEmailClient))
-         , ((myModMask, xK_b), spawn ("konqueror"))
-         , ((myModMask, xK_r), spawn (myTerminal ++ " -e lf"))
-	
-	 -- launch/copy apps
-         , ((myModMask .|. shiftMask, xK_o), runOrCopy "pcmanfm" (className =? "Pcmanfm"))
-         , ((myModMask, xK_m), runOrCopy "vlc" (className =? "vlc"))
-         , ((myModMask .|. shiftMask, xK_m), spawnOn "  十  " "vlc")
-
-         -- volume
-         , ((altMask, xK_0), spawn (myVolMute))
-         , ((altMask, xK_minus), spawn (myVolDown))
-         , ((altMask, xK_equal), spawn (myVolUp))
-
-	 -- scratchpad keybindings
-	 , ((myModMask, xK_u), namedScratchpadAction myScratchpads "Phone")
-	 , ((myModMask, xK_t), namedScratchpadAction myScratchpads "Terminal")
-	 , ((myModMask, xK_w), namedScratchpadAction myScratchpads "Nitrogen")
-
-         -- view prev/next workspaces
-         , ((altMask, xK_h), prevWS)
-         , ((altMask, xK_l), nextWS)
-
-         -- move to prev/next workspaces
-         , ((altMask .|. shiftMask, xK_h), shiftToPrev >> prevWS)
-         , ((altMask .|. shiftMask, xK_l), shiftToNext >> nextWS)
-
-         -- modify gaps on runtime
-         , ((myModMask, xK_equal), incWindowSpacing 1)
-         , ((myModMask, xK_minus), decWindowSpacing 1)
-         , ((myModMask .|. shiftMask, xK_equal), incScreenSpacing 1)  
-         , ((myModMask .|. shiftMask, xK_minus), decScreenSpacing 1)         
-
-         -- Swap the focused window and the master window
-         , ((mod1Mask .|. shiftMask, xK_Return), windows W.swapMaster)
-
-         -- these keybindings are for WindowNavigation
-         -- and they conflict with BSP layout
-         -- directional navigation of windows
-         , ((myModMask,                 xK_l), sendMessage $ Go R)
-         , ((myModMask,                 xK_h), sendMessage $ Go L)
-         , ((myModMask,                 xK_k), sendMessage $ Go U)
-         , ((myModMask,                 xK_j), sendMessage $ Go D)
-
-         -- swap windows
-         , ((myModMask .|. shiftMask, xK_l), sendMessage $ WN.Swap R)
-         , ((myModMask .|. shiftMask, xK_h), sendMessage $ WN.Swap L)
-         , ((myModMask .|. shiftMask, xK_k), sendMessage $ WN.Swap U)
-         , ((myModMask .|. shiftMask, xK_j), sendMessage $ WN.Swap D)
-         
-         -- cycle through windows 
-         , ((altMask, xK_j), windows W.focusDown)
-         , ((altMask, xK_k), windows W.focusUp)
-
-         -- kinda bad horizontal resizing of windows in non-bsp layouts
-         , ((myModMask, xK_Right), sendMessage Expand)
-         , ((myModMask, xK_Left), sendMessage Shrink)
-
-         -- paste x selection
-         , ((altMask, xK_v), pasteSelection)
-
-         -- toggle bars
-         , ((myModMask, xK_backslash), sendMessage ToggleStruts) -- toggle both bars
-
-         -- BSP layout keybindings
-         -- resize
-         , ((myModMask .|. mod1Mask,                  xK_l  ), sendMessage $ ExpandTowards R)
-         , ((myModMask .|. mod1Mask,                  xK_h  ), sendMessage $ ExpandTowards L)
-         , ((myModMask .|. mod1Mask,                  xK_j  ), sendMessage $ ExpandTowards D)
-         , ((myModMask .|. mod1Mask,                  xK_k  ), sendMessage $ ExpandTowards U)
-         , ((myModMask .|. mod1Mask .|. shiftMask ,   xK_l  ), sendMessage $ ShrinkFrom R)
-         , ((myModMask .|. mod1Mask .|. shiftMask ,   xK_h  ), sendMessage $ ShrinkFrom L)
-         , ((myModMask .|. mod1Mask .|. shiftMask ,   xK_j  ), sendMessage $ ShrinkFrom D)
-         , ((myModMask .|. mod1Mask .|. shiftMask ,   xK_k  ), sendMessage $ ShrinkFrom U)
-         -- other
-         , ((myModMask,                              xK_d     ), sendMessage Rotate)
-         , ((myModMask,                              xK_s     ), sendMessage BSP.Swap)
-         , ((myModMask, xK_f), withFocused (sendMessage . maximizeRestore))
-         ] ++ [ -- for extra workspace(s)
-         ((myModMask, key), (windows $ W.greedyView ws))
-         | (key,ws) <- myExtraWorkspaces
-         ] ++ [ -- also for extra workspaces
-         ((myModMask .|. shiftMask, key), (windows $ W.shift ws))
-         | (key,ws) <- myExtraWorkspaces
-         ] ++ [ -- to swap workspaces
-         ((mod1Mask .|. shiftMask, k), windows $ swapWithCurrent i)
-         | (i, k) <- zip myWorkspaces [xK_1 ..]
-         ] ++ [ -- copy
- 	   ((m .|. myModMask, k), windows $ f i)
-         | (i, k) <- zip (myWorkspaces) [xK_1 ..]
-         , (f, m) <- [(copy, shiftMask .|. altMask)]
- 	 ] ++ [ -- sticky-ing windows
-         ((myModMask, xK_v), windows copyToAll)  -- make window visible on all screens
-         , ((myModMask .|. shiftMask, xK_v), killAllOtherCopies)
-	 ]
--- Emacs style keybindings
-myKeys' :: [(String, X ())]
-myKeys' =
-         [-- Running or copying browsers 
-	 ("M-i f", runOrCopy "firefox" (className =? "Firefox"))
-	 , ("M-i S-f", spawn "firefox --private-window")
-         , ("M-i b", spawn "brave")
-         , ("M-i S-b", spawn "brave --incognito")
-	 -- this doesn't work when in myKeys
-	 , ("M-c", spawn myColorPicker)
-	 -- Launchers
-         , ("M-p", myTreeMenu myTSConfig)
-	 , ("M-S-p", spawn myLauncher)
-	 -- GridSelect
-	 , ("M-g g", goToSelected defaultGSConfig)
-	 , ("M-g b", bringSelected defaultGSConfig)
-	 ]
--- mouse keybindings
--- 1, 2, 3 = left, middle, right
-myMouseBindings = [((altMask, 2), \w -> kill1)
-         -- , ((altMask, 1), \w -> spawn "pcmanfm")
-         -- , ((altMask, 3), \w -> spawn "konqueror")
-         , ((altMask, 2), \w -> spawn myVolMute)
-         , ((altMask, 4), \w -> spawn myVolDown)
-         , ((altMask, 5), \w -> spawn myVolUp)
-         , ((myModMask, 4), \w -> prevWS)
-         , ((myModMask, 5), \w -> nextWS)
-         ]
-
--- tabs config
-myTabTheme = def { fontName            = myFont
-                 , activeColor         = "#755999"
-                 , inactiveColor       = "#282c35"
-                 , activeBorderColor   = "#755999"
-                 , inactiveBorderColor = "#313846"
-                 , activeTextColor     = "#FFFFFF"
-                 , inactiveTextColor   = "#d0d0d0"
-                 , decoHeight          = 20
-                 }
-
--- layouts
-myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True
-
-
--- myLayoutHook = onWorkspaces ["  二  ","  九  ","  十  "] altLayouts $ onWorkspaces ["  一  ","  三  ","  四  ","  五  ","  六  ","  七  ","  八  "] defLayouts
--- myLayoutHook = onWorkspace "  二  " renamed [R.Replace "Tabbed"] (avoidstruts $ smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme) ||| defLayouts
-
-myLayoutHook = avoidStruts ( -- layouts to be used in almost every workspace
-        renamed [R.Replace "BSP"]                  (maximize $ smartBorders $ windowNavigation $ myGap $ emptyBSP)
-        ||| renamed [R.Replace "Tabbed"]           (maximize $ smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme)
-        ||| renamed [R.Replace "Accordion"]        (maximize $ smartBorders $ windowNavigation $ myGap $ Accordion)
-        ||| renamed [R.Replace "ZoomRow"]          (maximize $ smartBorders $ windowNavigation $ myGap $ zoomRow)
-        ||| renamed [R.Replace "TwoPane"]          (maximize $ smartBorders $ windowNavigation $ myGap $ TwoPane (3/100) (1/2))
-        ||| renamed [R.Replace "ZoomRow Mirrored"] (maximize $ smartBorders $ windowNavigation $ myGap $ Mirror zoomRow)
-        ||| renamed [R.Replace "ThreeCol Mid (1)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeColMid 1 (3/100) (1/2))
-        ||| renamed [R.Replace "ThreeCol Mid (2)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeColMid 2 (3/100) (1/2))
-        ||| renamed [R.Replace "Grid"]             (maximize $ smartBorders $ windowNavigation $ myGap $ Grid)
-        ||| renamed [R.Replace "ThreeCol (1)"]     (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeCol 1 (3/100) (1/2))
-        ||| renamed [R.Replace "Tabbed"]           (maximize $ smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme)
-        ||| renamed [R.Replace "ThreeCol (2)"]     (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeCol 2 (3/100) (1/2))
-	-- ||| onWorkspace "  二  " renamed [R.Replace "Tabbed"]           (smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme)
-        )
-
--- myLemonbarPP :: D.Client -> PP
--- myLemonbarPP dbus = def { ppOutput = dbusOutput dbus
-myLemonbarPP  = def {
-                   ppCurrent = wrap "%{B#d33682}%{F-}" "%{B-}" 
-                   , ppWsSep = ""
-                   , ppHidden = wrap "%{F#02fc45}%{B#130F23}" "%{B-}%{f-}"
-                   , ppHiddenNoWindows = wrap "%{F#268bd2}" "%{F-}"
-                   , ppTitle = wrap " %{B#130F23}%{F#6c71c4}  " "  %{F-}%{B-}" . shorten 60
-                   , ppUrgent = wrap "%{B#9cfc02}    " "    %{B-}%{F-}"
-                   , ppLayout = wrap "%{B#130F23}%{F#cb31d6} " " %{F-}%{B-}"
-                   , ppSep =  " "
-                   , ppOrder  = \(ws:l:t:ex) -> [ws]++[l]++[t]++ex
-                   }
-
--- dbusOutput :: D.Client -> String -> IO ()
--- dbusOutput dbus str = do
---     let signal = (D.signal objectPath interfaceName memberName) {
---             D.signalBody = [D.toVariant $ UTF8.decodeString str]
---         }
---     D.emit dbus signal
---   where
---     objectPath = D.objectPath_ "/org/xmonad/Log"
---     interfaceName = D.interfaceName_ "org.xmonad.Log"
---     memberName = D.memberName_ "Update"
-
-main :: IO ()
-main = do
-  notXMobar <- spawnPipe "lemonbar -p -b -g 800x21+0+0  -B '#171520' -F '#ffffff' -o -3 -f 'Source Han Sans JP:size=10' -o 0 -f 'RobotoMono Nerd Font:style=Regular:size=15'"
-  -- dbus <- D.connectSession
-  -- Request access to the DBus name
-  -- D.requestName dbus (D.busName_ "org.xmonad.Log")
-  --     [D.nameAllowReplacement, D.nameReplaceExisting, D.nameDoNotQueue]
-  xmonad $ docks def
-    {
-  terminal           = myTerminal,
-  focusFollowsMouse  = True,
-  borderWidth        = myBorderWidth,
-  modMask            = myModMask,
-  workspaces         = myWorkspaces,
-  normalBorderColor  = nBorder,
-  focusedBorderColor = fBorder,
-  layoutHook         = myLayoutHook,
-  manageHook         = manageSpawn <+> namedScratchpadManageHook myScratchpads,
-  handleEventHook    = handleEventHook def <+> fullscreenEventHook,
-
-  -- logHook = dynamicLogWithPP (myLemonbarPP dbus),
-  logHook            = dynamicLogWithPP myLemonbarPP { ppOutput = \x -> hPutStrLn notXMobar x}, 
-  startupHook        = myStartupHook
-} `additionalMouseBindings` myMouseBindings `additionalKeys` myKeys `additionalKeysP` myKeys'