-- SPDX-FileCopyrightText: 2022 Gregor Kleen <gregor.kleen@ifi.lmu.de>
--
-- SPDX-License-Identifier: AGPL-3.0-or-later

{-# OPTIONS_GHC -fno-warn-orphans #-}

module Yesod.Form.Types.Instances
  () where

import ClassyPrelude.Yesod
-- import Yesod.Form.Types

-- import Data.Default
import Data.Binary

instance Default (FieldSettings site) where
  def = ""

deriving instance (Show a) => Show (Option a)

-- to memcache Option Text and Option Textarea
deriving instance Generic (Option Text)
deriving instance Binary  (Option Text)

deriving newtype instance Binary  Textarea
deriving instance Generic (Option Textarea)
deriving instance Binary  (Option Textarea)