makeQuery1 :: B.ByteString -> Query
makeQuery1 n = Query "SELECT $1" [(Oid 23, Just $ PE.bytea n )] 
    Text Text AlwaysCache
makeQuery1 :: B.ByteString -> Query
makeQuery1 n = Query "SELECT $1" [(Oid 23, Just $ PE.bytea n )] 
    Text Text AlwaysCache
makeQuery1 n = Query "SELECT $1" [(Oid 23, Just $ PE.bytea n )] 
    Text Text AlwaysCache