ilyakooo0/reflex-vty
1
0
Fork 0
mirror of https://github.com/ilyakooo0/reflex-vty.git synced 2024-11-23 03:13:26 +03:00
Code Issues Projects Releases Wiki Activity

Fix for reflex-0.6.3

Browse Source
This commit is contained in:
Ali Abrar 2019-12-31 10:35:16 -05:00
parent 75831ad9ac
commit 6aea4cd874
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ChangeLog.md
View File

@ -3,6 +3,7 @@
## Unreleased
* Add `keyCombo` function (single-key-combination version of `keyCombos`)
* Use upstream `NotReady` instances instead of orphans defined in this package if reflex-0.6.3 is available
## 0.1.2.0
* Allow TextZipper contents to be tranformed before being displayed

5
src/Reflex/Spider/Orphans.hs
View File

@ -2,15 +2,17 @@
Module: Reflex.Spider.Orphans
Description: Orphan instances for SpiderTimeline and SpiderHost
-}
{-# LANGUAGE CPP #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}
module Reflex.Spider.Orphans where
#if MIN_VERSION_reflex(0,6,3)
#else
import Reflex
import Reflex.Spider.Internal
-- TODO move this to reflex
instance NotReady (SpiderTimeline x) (SpiderHost x) where
notReadyUntil _ = pure ()
notReady = pure ()
@ -18,3 +20,4 @@ instance NotReady (SpiderTimeline x) (SpiderHost x) where
instance HasSpiderTimeline x => NotReady (SpiderTimeline x) (PerformEventT (SpiderTimeline x) (SpiderHost x)) where
notReadyUntil _ = pure ()
notReady = pure ()
#endif