我正在构建一个基于Scotty的应用程序,并且我正在尝试导入并添加目录中包含的动态中间件列表。
我不想对我的中间件列表进行硬编码 - 但截至目前,我正在使用Index.hs
来公开所有目录中间件。
我们说我有Main.hs
import Controllers.Index (endpoints)
...
main :: IO ()
main = do
port <- read <$> getEnv "PORT"
scotty port $ do
middleware logStdoutDev
endpoints
然后在Controllers/Index.hs
:
module Controllers.Index
( endpoints ) where
import Controllers.Order (order)
import Controllers.User (user)
...
import Web.Scotty (ScottyM)
endpoints :: ScottyM ()
endpoints = order >> user >> ...
每个Controllers/*.hs
都包含一个中间件。
摆脱Controllers/Index.hs
的最佳方法是什么?
有没有办法从目录导入所有模块并获得我可以使用的列表?