PaymentMethodChangeEvent.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from payment-request (webref). Do not edit.
module JSDOM.Generated.PaymentMethodChangeEvent
       (newPaymentMethodChangeEvent, getMethodName, getMethodDetails, getMethodDetailsUnsafe, getMethodDetailsUnchecked, PaymentMethodChangeEvent(..), gTypePaymentMethodChangeEvent)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/PaymentMethodChangeEvent/PaymentMethodChangeEvent MDN PaymentMethodChangeEvent. documentation>
newPaymentMethodChangeEvent :: (MonadDOM m, ToJSString type') => type' -> Maybe PaymentMethodChangeEventInit -> m PaymentMethodChangeEvent
newPaymentMethodChangeEvent type' eventInitDict = liftDOM (((new (jsg "PaymentMethodChangeEvent") [toJSVal type', P.maybe (P.return jsUndefined) toJSVal eventInitDict]) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/PaymentMethodChangeEvent/methodName MDN PaymentMethodChangeEvent.methodName documentation>
getMethodName :: (MonadDOM m, FromJSString result) => PaymentMethodChangeEvent -> m result
getMethodName self = liftDOM (((self ^. js "methodName") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/PaymentMethodChangeEvent/methodDetails MDN PaymentMethodChangeEvent.methodDetails documentation>
getMethodDetails :: (MonadDOM m) => PaymentMethodChangeEvent -> m (Maybe GObject)
getMethodDetails self = liftDOM (((self ^. js "methodDetails") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/PaymentMethodChangeEvent/methodDetails MDN PaymentMethodChangeEvent.methodDetails documentation>
getMethodDetailsUnsafe :: (MonadDOM m, HasCallStack) => PaymentMethodChangeEvent -> m GObject
getMethodDetailsUnsafe self = liftDOM ((((self ^. js "methodDetails") >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/PaymentMethodChangeEvent/methodDetails MDN PaymentMethodChangeEvent.methodDetails documentation>
getMethodDetailsUnchecked :: (MonadDOM m) => PaymentMethodChangeEvent -> m GObject
getMethodDetailsUnchecked self = liftDOM (((self ^. js "methodDetails") >>= fromJSValUnchecked))