fix compilation error

config/routes

@@ -1,8 +1,8 @@
-/ RootR GET
+/ 																									RootR 						GET
 
 -- EOS API V0
-/eos/v0/latest                             EosVersionR        GET -- get eos information
-/eos/v0/eos.img                            EosR               GET -- get eos.img
+/eos/v0/latest                             					EosVersionR        GET -- get eos information
+/eos/v0/eos.img                            					EosR               GET -- get eos.img
 
 -- PACKAGE API V0
 /package/#ApiVersion/info                           InfoR              GET -- get all marketplace categories
@@ -17,9 +17,9 @@
 /package/#ApiVersion/version/#PkgId                 PkgVersionR        GET -- get most recent appId version
 
 -- ADMIN API V0
-/admin/v0/upload                           PkgUploadR         POST !admin
-/admin/v0/eos-upload                       EosUploadR         POST !admin
-/admin/v0/index                            PkgIndexR          POST !admin
-/admin/v0/deindex                          PkgDeindexR        GET POST !admin
-/admin/v0/category/#Text                   CategoryR          POST DELETE !admin
-/admin/v0/categorize/#Text/#PkgId          PkgCategorizeR     POST DELETE !admin
+/admin/v0/upload                           					PkgUploadR         POST !admin
+/admin/v0/eos-upload                       					EosUploadR         POST !admin
+/admin/v0/index                            					PkgIndexR          POST !admin
+/admin/v0/deindex                          					PkgDeindexR        GET POST !admin
+/admin/v0/category/#Text                   					CategoryR          POST DELETE !admin
+/admin/v0/categorize/#Text/#PkgId          					PkgCategorizeR     POST DELETE !admin

src/Application.hs

@@ -186,8 +186,8 @@ import Handler.Admin (
     postPkgUploadR,
  )
 import Handler.Eos (getEosR, getEosVersionR)
+import Handler.Root(getRootR)
 import Handler.Package
-import Handler.Root
 import Lib.Ssl (
     doesSslNeedRenew,
     renewSslCerts,

src/Foundation.hs

@@ -153,8 +153,6 @@ import Yesod.Persist.Core (
 import Database.Persist ((==.))
 import Database.Persist (selectFirst)
 import Database.Persist (entityVal)
-import Handler.Root
-
 
 -- | The foundation datatype for your application. This can be a good place to
 -- keep settings and values requiring initialization before your application

src/Handler/Root.hs

@@ -1,6 +1,7 @@
 module Handler.Root where
 import Startlude
+import Yesod
+import Foundation
 
-
-getRootR :: Handler ()
-getRootR = notImplemented
+getRootR :: HandlerFor RegistryCtx ()
+getRootR =  notImplemented