diff --git a/src/KDL/Decoder/Arrow.hs b/src/KDL/Decoder/Arrow.hs index dae102f..9fe0791 100644 --- a/src/KDL/Decoder/Arrow.hs +++ b/src/KDL/Decoder/Arrow.hs @@ -72,7 +72,6 @@ module KDL.Decoder.Arrow ( DecodeValue (..), any, string, - text, number, bool, null, @@ -1025,11 +1024,6 @@ string = valueDataDecoderPrim (SchemaOne TextSchema) $ \case Value{data_ = String s} -> pure s v -> decodeThrow DecodeError_ValueDecodeFail{expectedType = "string", value = v} --- | Deprecated in favor of 'string'. -text :: DecodeArrow Value a Text -text = string -{-# DEPRECATED text "Use KDL.string instead" #-} - -- | Decode a KDL number value. number :: DecodeArrow Value a Scientific number = valueDataDecoderPrim (SchemaOne NumberSchema) $ \case