mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 03:20:21 -07:00
XMonad.Actions.MessageFeedback: Remove deprecations
This commit is contained in:
parent
6ab4d9c0bc
commit
16701c2df2
@ -42,12 +42,6 @@ module XMonad.Actions.MessageFeedback
|
|||||||
|
|
||||||
-- ** Aliases
|
-- ** Aliases
|
||||||
, sm
|
, sm
|
||||||
|
|
||||||
-- * Backwards Compatibility
|
|
||||||
-- $backwardsCompatibility
|
|
||||||
, send, sendSM, sendSM_
|
|
||||||
, tryInOrder, tryInOrder_
|
|
||||||
, tryMessage, tryMessage_
|
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import XMonad ( Window )
|
import XMonad ( Window )
|
||||||
@ -230,46 +224,3 @@ tryMessageWithNoRefreshToCurrent m = void . tryMessageWithNoRefreshToCurrentB m
|
|||||||
-- | Convenience shorthand for 'SomeMessage'.
|
-- | Convenience shorthand for 'SomeMessage'.
|
||||||
sm :: Message a => a -> SomeMessage
|
sm :: Message a => a -> SomeMessage
|
||||||
sm = SomeMessage
|
sm = SomeMessage
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
-- Backwards Compatibility:
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
{-# DEPRECATED send "Use sendMessageB instead." #-}
|
|
||||||
{-# DEPRECATED sendSM "Use sendSomeMessageB instead." #-}
|
|
||||||
{-# DEPRECATED sendSM_ "Use sendSomeMessage instead." #-}
|
|
||||||
{-# DEPRECATED tryInOrder "Use tryInOrderWithNoRefreshToCurrentB instead." #-}
|
|
||||||
{-# DEPRECATED tryInOrder_ "Use tryInOrderWithNoRefreshToCurrent instead." #-}
|
|
||||||
{-# DEPRECATED tryMessage "Use tryMessageWithNoRefreshToCurrentB instead." #-}
|
|
||||||
{-# DEPRECATED tryMessage_ "Use tryMessageWithNoRefreshToCurrent instead." #-}
|
|
||||||
|
|
||||||
-- $backwardsCompatibility
|
|
||||||
-- The following functions exist solely for compatibility with pre-0.14
|
|
||||||
-- releases.
|
|
||||||
|
|
||||||
-- | See 'sendMessageWithNoRefreshToCurrentB'.
|
|
||||||
send :: Message a => a -> X Bool
|
|
||||||
send = sendMessageWithNoRefreshToCurrentB
|
|
||||||
|
|
||||||
-- | See 'sendSomeMessageWithNoRefreshToCurrentB'.
|
|
||||||
sendSM :: SomeMessage -> X Bool
|
|
||||||
sendSM = sendSomeMessageWithNoRefreshToCurrentB
|
|
||||||
|
|
||||||
-- | See 'sendSomeMessageWithNoRefreshToCurrent'.
|
|
||||||
sendSM_ :: SomeMessage -> X ()
|
|
||||||
sendSM_ = sendSomeMessageWithNoRefreshToCurrent
|
|
||||||
|
|
||||||
-- | See 'tryInOrderWithNoRefreshToCurrentB'.
|
|
||||||
tryInOrder :: [SomeMessage] -> X Bool
|
|
||||||
tryInOrder = tryInOrderWithNoRefreshToCurrentB
|
|
||||||
|
|
||||||
-- | See 'tryInOrderWithNoRefreshToCurrent'.
|
|
||||||
tryInOrder_ :: [SomeMessage] -> X ()
|
|
||||||
tryInOrder_ = tryInOrderWithNoRefreshToCurrent
|
|
||||||
|
|
||||||
-- | See 'tryMessageWithNoRefreshToCurrentB'.
|
|
||||||
tryMessage :: (Message a, Message b) => a -> b -> X Bool
|
|
||||||
tryMessage = tryMessageWithNoRefreshToCurrentB
|
|
||||||
|
|
||||||
-- | See 'tryMessageWithNoRefreshToCurrent'.
|
|
||||||
tryMessage_ :: (Message a, Message b) => a -> b -> X ()
|
|
||||||
tryMessage_ = tryMessageWithNoRefreshToCurrent
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user