From a3efb4e90b74efdf425b6c582f5e581b661d6c1e Mon Sep 17 00:00:00 2001
From: Lucy Cifferello <12953208+elvece@users.noreply.github.com>
Date: Fri, 16 Jun 2023 12:56:11 -0600
Subject: [PATCH] attempt redirect

---
 src/Handler/Root.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Handler/Root.hs b/src/Handler/Root.hs
index 949f85e..c762764 100644
--- a/src/Handler/Root.hs
+++ b/src/Handler/Root.hs
@@ -2,6 +2,7 @@ module Handler.Root where
 import Startlude
 import Yesod
 import Foundation
+import qualified Data.Text as T
 
 getRootR :: HandlerFor RegistryCtx ()
-getRootR =  notImplemented
\ No newline at end of file
+getRootR =  redirect $ T.pack "https://marketplace.start9.com"
\ No newline at end of file