gtk >= 0.13 uses Text instead of String

[ghorn]

This applies to Chart-gtk. The short term solution is to constrain the upper version, the long-term solution is:

import qualified Data.Text as T

-- do action m for any keypress (except meta keys)
anyKey :: (Monad m) => m a -> GE.Event -> m Bool
anyKey m (GE.Key {GE.eventKeyName=key})
    | any (`T.isPrefixOf` key) ignores = return True
    | otherwise                      = m >> return True
  where
    ignores :: [T.Text]
    ignores = map T.pack ["Shift","Control","Alt",
                          "Super","Meta","Hyper"]

[peti]

Any chance we could get a new release on Hackage that includes this fix?

[timbod7]

Fixed released to hackage with version 1.2.4