REF clean up imports
This commit is contained in:
parent
80b8a2cec6
commit
84e3c4a0a1
|
@ -42,7 +42,7 @@ steps:
|
||||||
# - none: Do not perform any alignment.
|
# - none: Do not perform any alignment.
|
||||||
#
|
#
|
||||||
# Default: global.
|
# Default: global.
|
||||||
align: group
|
align: global
|
||||||
|
|
||||||
# The following options affect only import list alignment.
|
# The following options affect only import list alignment.
|
||||||
#
|
#
|
||||||
|
|
121
bin/xmonad.hs
121
bin/xmonad.hs
|
@ -3,83 +3,78 @@
|
||||||
|
|
||||||
module Main (main) where
|
module Main (main) where
|
||||||
|
|
||||||
import ACPI
|
import ACPI
|
||||||
import DBus.Client (Client)
|
import DBus.Client (Client)
|
||||||
import Notify
|
import Notify
|
||||||
import SendXMsg
|
import SendXMsg
|
||||||
import Shell
|
import Shell
|
||||||
|
|
||||||
import DBus.Common
|
import DBus.Common
|
||||||
import DBus.IntelBacklight
|
import DBus.IntelBacklight
|
||||||
import DBus.Screensaver
|
import DBus.Screensaver
|
||||||
|
|
||||||
import qualified Theme as T
|
import qualified Theme as T
|
||||||
|
|
||||||
import Control.Concurrent
|
import Control.Concurrent
|
||||||
import Control.Monad (forM, forM_, mapM_, void, when)
|
import Control.Monad
|
||||||
|
( forM
|
||||||
|
, forM_
|
||||||
|
, mapM_
|
||||||
|
, void
|
||||||
|
, when
|
||||||
|
)
|
||||||
|
|
||||||
import Data.List (find, sortBy, sortOn)
|
import Data.List (find, sortBy, sortOn)
|
||||||
import qualified Data.Map.Lazy as M
|
import qualified Data.Map.Lazy as M
|
||||||
import Data.Maybe (catMaybes, isJust)
|
import Data.Maybe (catMaybes, isJust)
|
||||||
import Data.Monoid (All (..))
|
import Data.Monoid (All (..))
|
||||||
|
|
||||||
import Graphics.X11.Types
|
import Graphics.X11.Types
|
||||||
import Graphics.X11.Xlib.Atom
|
import Graphics.X11.Xlib.Atom
|
||||||
import Graphics.X11.Xlib.Extras
|
import Graphics.X11.Xlib.Extras
|
||||||
import Graphics.X11.Xrandr
|
import Graphics.X11.Xrandr
|
||||||
|
|
||||||
import Control.Arrow (first)
|
import Control.Arrow (first)
|
||||||
import Control.Exception
|
import Control.Exception
|
||||||
|
|
||||||
import System.Directory
|
import System.Directory
|
||||||
import System.Exit
|
import System.Exit
|
||||||
import System.IO
|
import System.IO
|
||||||
import System.Posix.IO
|
import System.Posix.IO
|
||||||
import System.Posix.Process
|
import System.Posix.Process
|
||||||
import System.Posix.Signals
|
import System.Posix.Signals
|
||||||
import System.Posix.Types
|
import System.Posix.Types
|
||||||
import System.Process (waitForProcess)
|
import System.Process (waitForProcess)
|
||||||
import System.Process.Internals
|
import System.Process.Internals
|
||||||
( ProcessHandle__ (ClosedHandle, OpenHandle)
|
( ProcessHandle__ (ClosedHandle, OpenHandle)
|
||||||
, mkProcessHandle
|
, mkProcessHandle
|
||||||
, withProcessHandle
|
, withProcessHandle
|
||||||
)
|
)
|
||||||
|
|
||||||
import Text.Read (readMaybe)
|
import Text.Read (readMaybe)
|
||||||
|
|
||||||
import XMonad
|
import XMonad
|
||||||
import XMonad.Actions.CopyWindow
|
import XMonad.Actions.CopyWindow
|
||||||
import XMonad.Actions.CycleWS
|
import XMonad.Actions.CycleWS
|
||||||
import XMonad.Actions.DynamicWorkspaces
|
import XMonad.Actions.DynamicWorkspaces
|
||||||
import XMonad.Actions.PhysicalScreens
|
import XMonad.Actions.PhysicalScreens
|
||||||
import XMonad.Actions.Volume
|
import XMonad.Actions.Volume
|
||||||
-- import XMonad.Config.Desktop
|
import XMonad.Hooks.DynamicLog
|
||||||
import XMonad.Hooks.DynamicLog
|
import XMonad.Hooks.EwmhDesktops
|
||||||
import XMonad.Hooks.EwmhDesktops
|
import XMonad.Hooks.ManageDocks
|
||||||
import XMonad.Hooks.ManageDocks
|
import XMonad.Hooks.ManageHelpers
|
||||||
-- import XMonad.Layout.IndependentScreens
|
import XMonad.Layout.Named
|
||||||
import XMonad.Hooks.ManageHelpers
|
import XMonad.Layout.NoBorders
|
||||||
-- import XMonad.Layout.BinarySpacePartition (emptyBSP)
|
import XMonad.Layout.NoFrillsDecoration
|
||||||
-- import XMonad.Layout.DragPane
|
import XMonad.Layout.PerWorkspace
|
||||||
-- import XMonad.Layout.IM
|
import XMonad.Layout.Tabbed
|
||||||
-- import XMonad.Layout.LayoutCombinators hiding ((|||))
|
import XMonad.Prompt
|
||||||
import XMonad.Layout.Named
|
import XMonad.Prompt.ConfirmPrompt
|
||||||
import XMonad.Layout.NoBorders
|
import XMonad.Util.EZConfig
|
||||||
import XMonad.Layout.NoFrillsDecoration
|
import XMonad.Util.NamedActions
|
||||||
import XMonad.Layout.PerWorkspace
|
import XMonad.Util.Run
|
||||||
-- import XMonad.Layout.ResizableTile
|
|
||||||
import XMonad.Layout.Tabbed
|
|
||||||
-- import XMonad.Layout.ToggleLayouts (ToggleLayout(..), toggleLayouts)
|
|
||||||
import XMonad.Prompt
|
|
||||||
import XMonad.Prompt.ConfirmPrompt
|
|
||||||
-- import XMonad.Prompt.XMonad
|
|
||||||
-- import XMonad.Prompt.Shell
|
|
||||||
import XMonad.Util.EZConfig
|
|
||||||
import XMonad.Util.NamedActions
|
|
||||||
import XMonad.Util.Run
|
|
||||||
-- import XMonad.Util.WindowProperties
|
|
||||||
|
|
||||||
import qualified XMonad.StackSet as W
|
import qualified XMonad.StackSet as W
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = do
|
main = do
|
||||||
|
|
Loading…
Reference in New Issue