Merged

Conversation

… and new Filter operators (@>.) and (<@.)

		-- Any empty Object matches any object
		-- @
		-- {"a":1,"b":false} @> {} --> True
		-- @

		(@>.) :: EntityField record Value -> Value -> Filter record
		(@>.) field val = Filter field (Left val) $ BackendSpecificFilter " @> "

		-- \| Same as `(<@.)` except the inclusion check is reversed.

		case eitherDecodeStrict bs of
		Left str -> Left $ fromPersistValueParseError "FromJSON" bs $ T.pack str
		Right v -> Right v
		fromPersistValueJsonB x = Left $ fromPersistValueError "FromJSON" "string or bytestring" x

* Upgraded the randomValues function in DataTestTypes.hs to actually have random values everytime
* small OCD

…work because of it

None yet