Keenser.Util

Documentation

queue :: ToJSON a => Job a -> Redis ()

randomHex :: Int -> IO String

digits :: [Char]

mkJob :: MonadIO m => Worker m a -> a -> m (Job a)

asJSON :: ToJSON a => a -> Object

repeatUntil :: Monad m => m Bool -> m () -> m ()

rightToMaybe :: Either a b -> Maybe b

trim :: Eq a => [a] -> [a] -> [a]

parseMaybe :: Parser a -> ByteString -> Maybe a

boolToRedis :: Bool -> ByteString