6aea4cd · reflex-vty · git.iko.soy

git.iko.soy/reflex-vty

Fix for reflex-0.6.3

commit6aea4cd874775d01cb15a99cc486c9ee6e88dcf3 authorAli Abrar <aliabrar@gmail.com> dateTue 31 Dec 2019, 10:35 (7 years ago) parent75831ad

2 files changed+5−1

unifiedsplit

ChangeLog.md+1

@@ -3,6 +3,7 @@

33## Unreleased

55* Add `keyCombo` function (single-key-combination version of `keyCombos`)

6+* Use upstream `NotReady` instances instead of orphans defined in this package if reflex-0.6.3 is available

78## 0.1.2.0

89* Allow TextZipper contents to be tranformed before being displayed

src/Reflex/Spider/Orphans.hs+4−1

@@ -2,15 +2,17 @@

22Module: Reflex.Spider.Orphans

33Description: Orphan instances for SpiderTimeline and SpiderHost

44-}

5+{-# LANGUAGE CPP #-}

56{-# LANGUAGE FlexibleInstances #-}

67{-# LANGUAGE MultiParamTypeClasses #-}

78{-# OPTIONS_GHC -fno-warn-orphans #-}

89module Reflex.Spider.Orphans where

910

11+#if MIN_VERSION_reflex(0,6,3)

12+#else

1013import Reflex

1114import Reflex.Spider.Internal

1215

13−-- TODO move this to reflex

1416instance NotReady (SpiderTimeline x) (SpiderHost x) where

1517 notReadyUntil _ = pure ()

1618 notReady = pure ()

@@ -18,3 +20,4 @@ instance NotReady (SpiderTimeline x) (SpiderHost x) where

1820instance HasSpiderTimeline x => NotReady (SpiderTimeline x) (PerformEventT (SpiderTimeline x) (SpiderHost x)) where

1921 notReadyUntil _ = pure ()

2022 notReady = pure ()

23+#endif