Merge pull request #444 from slotThe/exception-extensible

Control.Exception.Extensible -> Control.Exception
This commit is contained in:
Tomáš Janoušek 2021-01-17 20:35:38 +01:00 committed by GitHub
commit 03650d5d3f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
8 changed files with 7 additions and 9 deletions

View File

@ -30,7 +30,7 @@ import XMonad.Util.DebugWindow (debugWindow)
-- import Graphics.X11.Xlib.Extras.GetAtomName (getAtomName) -- import Graphics.X11.Xlib.Extras.GetAtomName (getAtomName)
import Control.Exception.Extensible as E import Control.Exception as E
import Control.Monad.State import Control.Monad.State
import Control.Monad.Reader import Control.Monad.Reader
import Data.Char (isDigit) import Data.Char (isDigit)

View File

@ -100,7 +100,7 @@ import XMonad.Util.XSelection (getSelection)
import Codec.Binary.UTF8.String (decodeString,isUTF8Encoded) import Codec.Binary.UTF8.String (decodeString,isUTF8Encoded)
import Control.Arrow (first, second, (&&&), (***)) import Control.Arrow (first, second, (&&&), (***))
import Control.Concurrent (threadDelay) import Control.Concurrent (threadDelay)
import Control.Exception.Extensible as E hiding (handle) import Control.Exception as E hiding (handle)
import Control.Monad.State import Control.Monad.State
import Data.Bits import Data.Bits
import Data.Char (isSpace) import Data.Char (isSpace)

View File

@ -31,7 +31,7 @@ import XMonad.Core
import XMonad.Prompt import XMonad.Prompt
import System.IO import System.IO
import Control.Exception.Extensible (bracket) import Control.Exception (bracket)
-- $usage -- $usage
-- --

View File

@ -33,7 +33,7 @@ import System.Directory
import System.Process import System.Process
import System.IO import System.IO
import qualified Control.Exception.Extensible as E import qualified Control.Exception as E
import Control.Monad import Control.Monad
import Data.List import Data.List
import Data.Maybe import Data.Maybe

View File

@ -20,7 +20,7 @@ import Prelude
import XMonad import XMonad
import Codec.Binary.UTF8.String (decodeString) import Codec.Binary.UTF8.String (decodeString)
import Control.Exception.Extensible as E import Control.Exception as E
import Control.Monad (when) import Control.Monad (when)
import Data.List (unfoldr import Data.List (unfoldr
,intercalate ,intercalate

View File

@ -23,7 +23,7 @@ module XMonad.Util.NamedWindows (
unName unName
) where ) where
import Control.Exception.Extensible as E import Control.Exception as E
import Data.Maybe ( fromMaybe, listToMaybe ) import Data.Maybe ( fromMaybe, listToMaybe )
import qualified XMonad.StackSet as W ( peek ) import qualified XMonad.StackSet as W ( peek )

View File

@ -22,7 +22,7 @@ module XMonad.Util.XSelection ( -- * Usage
transformPromptSelection, transformPromptSelection,
transformSafePromptSelection) where transformSafePromptSelection) where
import Control.Exception.Extensible as E (catch,SomeException(..)) import Control.Exception as E (catch,SomeException(..))
import Data.Maybe (fromMaybe) import Data.Maybe (fromMaybe)
import XMonad import XMonad
import XMonad.Util.Run (safeSpawn, unsafeSpawn) import XMonad.Util.Run (safeSpawn, unsafeSpawn)

View File

@ -51,7 +51,6 @@ library
bytestring >= 0.10 && < 0.11, bytestring >= 0.10 && < 0.11,
containers >= 0.5 && < 0.7, containers >= 0.5 && < 0.7,
directory, directory,
extensible-exceptions,
filepath, filepath,
old-locale, old-locale,
old-time, old-time,
@ -377,7 +376,6 @@ test-suite properties
build-depends: base build-depends: base
, QuickCheck >= 2 , QuickCheck >= 2
, containers , containers
, extensible-exceptions
, xmonad-contrib , xmonad-contrib
, directory , directory
, X11>=1.6.1 && < 1.10 , X11>=1.6.1 && < 1.10