2 files changed, 3 insertions, 0 deletions
diff --git a/fig-web/src/Fig/Web/Module/Misc.hs b/fig-web/src/Fig/Web/Module/Misc.hs
index b193314..d16df6c 100644
--- a/fig-web/src/Fig/Web/Module/Misc.hs
+++ b/fig-web/src/Fig/Web/Module/Misc.hs
@@ -15,6 +15,7 @@ import qualified Fig.Web.DB as DB
 public :: Module
 public a = do
   onGet "/api/motd" do
+    log "getting motd"
     DB.get a.db "motd" >>= \case
       Nothing -> respondText ""
       Just val -> respondText $ decodeUtf8 val
diff --git a/fig-web/src/Fig/Web/Module/Redeem.hs b/fig-web/src/Fig/Web/Module/Redeem.hs
index de66d8b..2d72f66 100644
--- a/fig-web/src/Fig/Web/Module/Redeem.hs
+++ b/fig-web/src/Fig/Web/Module/Redeem.hs
@@ -12,6 +12,8 @@ import Fig.Web.Types
 
 secure :: Module
 secure a = do
+  onGet "/api/redeeminfo" do
+    respondText "hiiiiiii"
   onPost "/api/redeem" $ authed \creds -> do
     name <- formParam "name"
     input <- formParamMaybe "input"