primrose/.files
1
0
Fork 0
mirror of https://codeberg.org/leana8959/.files.git synced 2025-12-06 14:49:14 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

vanadium/xmonad: refactor

Browse source
This commit is contained in:
Primrose 2025-11-05 08:54:06 +08:00
parent 073078a922
commit d243e6c32f
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA
5 changed files with 10 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

6
nix/configurations/vanadium/home/xmonad/leanamonad.cabal
View file

@ -24,9 +24,9 @@ library
import: common
hs-source-dirs: lib
exposed-modules:
Leanamonad.Layout.ReflectMsg
Leanamonad.Layout.ResizableTile
Leanamonad.GreekChar
XMonad.Layout.Reflect.Message
XMonad.Layout.ResizableTile.FixDescription
Data.Char.Greek
executable leanamonad
import: common

2
nix/configurations/vanadium/home/xmonad/lib/Leanamonad/GreekChar.hs → nix/configurations/vanadium/home/xmonad/lib/Data/Char/Greek.hs
View file

@ -1,4 +1,4 @@
module Leanamonad.GreekChar where
module Data.Char.Greek where
import Data.List (find)

2
nix/configurations/vanadium/home/xmonad/lib/Leanamonad/Layout/ReflectMsg.hs → nix/configurations/vanadium/home/xmonad/lib/XMonad/Layout/Reflect/Message.hs
View file

@ -1,7 +1,7 @@
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
module Leanamonad.Layout.ReflectMsg where
module XMonad.Layout.Reflect.Message where
import XMonad (
Resize (Expand, Shrink),

5
nix/configurations/vanadium/home/xmonad/lib/Leanamonad/Layout/ResizableTile.hs → nix/configurations/vanadium/home/xmonad/lib/XMonad/Layout/ResizableTile/FixDescription.hs
View file

@ -1,9 +1,8 @@
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE FlexibleInstances, MultiParamTypeClasses #-}
module Leanamonad.Layout.ResizableTile
( module XMonad.Layout.ResizableTile
, RTFixDescription(..)
module XMonad.Layout.ResizableTile.FixDescription
( RTFixDescription(..)
) where
import XMonad

7
nix/configurations/vanadium/home/xmonad/xmonad.hs
View file

@ -12,8 +12,10 @@ import XMonad.Hooks.RefocusLast
import XMonad.Hooks.StatusBar
import XMonad.Layout.NoBorders
import XMonad.Layout.Reflect
import XMonad.Layout.Reflect.Message
import XMonad.Layout.Renamed
import XMonad.Layout.ResizableTile
import XMonad.Layout.ResizableTile.FixDescription
import XMonad.Layout.Spacing
import qualified XMonad.StackSet as W
import XMonad.Util.EZConfig
@ -26,10 +28,7 @@ import qualified Data.Map.Strict as M
import System.Posix
import Graphics.X11.ExtraTypes.XF86
import Leanamonad.Layout.ReflectMsg
-- TODO: rename this module
import Leanamonad.Layout.ResizableTile
import Leanamonad.GreekChar
import Data.Char.Greek
main :: IO ()
main =