summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLLLL Colonq <llll@colonq>2024-11-25 23:35:08 -0500
committerLLLL Colonq <llll@colonq>2024-11-25 23:35:08 -0500
commit0ce4ce92373734a7482d735b44cb87326fced46b (patch)
treede0c70394f63c56a73736358b603c77595fe7167
parent4ff3b935dba24fd69811a95e222e4c02f10656df (diff)
Use secure API URL for redeem endpoint
-rw-r--r--src/Config.purs1
-rw-r--r--src/UI.purs2
2 files changed, 2 insertions, 1 deletions
diff --git a/src/Config.purs b/src/Config.purs
index 20b0ec2..b4b2d14 100644
--- a/src/Config.purs
+++ b/src/Config.purs
@@ -2,5 +2,6 @@ module Config where
foreign import mode :: String
foreign import apiServer :: String
+foreign import secureApiServer :: String
foreign import clientID :: String
foreign import authRedirectURL :: String
diff --git a/src/UI.purs b/src/UI.purs
index a01422f..3da0814 100644
--- a/src/UI.purs
+++ b/src/UI.purs
@@ -28,4 +28,4 @@ redirect url = liftEffect $ _redirect url
foreign import _submitRedeem :: String -> DOM.El.Element -> Effect Unit
submitRedeem :: forall m. MonadEffect m => DOM.El.Element -> m Unit
-submitRedeem el = liftEffect $ _submitRedeem (Config.apiServer <> "/redeem") el
+submitRedeem el = liftEffect $ _submitRedeem (Config.secureApiServer <> "/redeem") el