L.WorkspaceDir: cleanup redundant {definitions,imports}

This commit is contained in:
Steffen Schuldenzucker
2012-02-29 11:21:24 +00:00
parent c012b3408d
commit 807d356743

View File

@@ -30,20 +30,15 @@ module XMonad.Layout.WorkspaceDir (
) where ) where
import Prelude hiding (catch) import Prelude hiding (catch)
import Control.Exception
import System.Directory ( setCurrentDirectory, getCurrentDirectory ) import System.Directory ( setCurrentDirectory, getCurrentDirectory )
import Control.Monad ( when ) import Control.Monad ( when )
import XMonad hiding ( focus ) import XMonad hiding ( focus )
import XMonad.Util.Run ( runProcessWithInput )
import XMonad.Prompt ( XPConfig ) import XMonad.Prompt ( XPConfig )
import XMonad.Prompt.Directory ( directoryPrompt ) import XMonad.Prompt.Directory ( directoryPrompt )
import XMonad.Layout.LayoutModifier import XMonad.Layout.LayoutModifier
import XMonad.StackSet ( tag, currentTag ) import XMonad.StackSet ( tag, currentTag )
econst :: Monad m => a -> IOException -> m a
econst = const . return
-- $usage -- $usage
-- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@: -- You can use this module with the following in your @~\/.xmonad\/xmonad.hs@:
-- --