module Database.Redis.String
( itemSet
, itemSetB
, itemGet
, itemGetB
) where
import System.IO
import Database.Redis.Internal
itemSet :: Handle
-> String
-> String
-> IO (Maybe RedisReply)
itemSet h key value = request h $ map toUTF8 ["SET", key, value]
itemSetB :: Handle
-> ByteString
-> ByteString
-> IO (Maybe RedisReply)
itemSetB h key value = request h [toUTF8 "SET", key, value]
itemGet :: Handle
-> String
-> IO (Maybe RedisReply)
itemGet h key = request h $ map toUTF8 ["GET", key]
itemGetB :: Handle
-> ByteString
-> IO (Maybe RedisReply)
itemGetB h key = request h [toUTF8 "GET", key]