-- | -- Module: Network.Payments.PayPal.Auth -- Copyright: (C) 2016 Braden Walters -- License: MIT (see LICENSE file) -- Maintainer: Braden Walters <vc@braden-walters.info> -- Stability: experimental -- Portability: ghc module Network.Payments.PayPal.Environment ( EnvironmentUrl(..) , sandboxUrl , liveUrl ) where -- |URL of a PayPal environment. newtype EnvironmentUrl = EnvironmentUrl String deriving (Eq, Show) -- |URL to sandbox environment. sandboxUrl :: EnvironmentUrl sandboxUrl = EnvironmentUrl "https://api.sandbox.paypal.com" -- |URL to live environment. liveUrl :: EnvironmentUrl liveUrl = EnvironmentUrl "https://api.paypal.com"