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 Control.Exception.Extensible as E
import Control.Exception as E
import Control.Monad.State
import Control.Monad.Reader
import Data.Char (isDigit)

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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