From 91b2d36a1933a393feb7855d8b801e29488a8784 Mon Sep 17 00:00:00 2001 From: fr33domlover Date: Mon, 25 Jul 2022 18:40:36 +0000 Subject: [PATCH] Move models and routes files from config/ to new th/ dir --- src/Vervis/Foundation.hs | 2 +- src/Vervis/Model.hs | 5 +++-- {config => th}/models | 0 {config => th}/routes | 0 4 files changed, 4 insertions(+), 3 deletions(-) rename {config => th}/models (100%) rename {config => th}/routes (100%) diff --git a/src/Vervis/Foundation.hs b/src/Vervis/Foundation.hs index 636834e..56065e4 100644 --- a/src/Vervis/Foundation.hs +++ b/src/Vervis/Foundation.hs @@ -151,7 +151,7 @@ type PatchKeyHashid = KeyHashid Patch getDvara :: App -> Dvara getDvara = const dvara -mkYesodData "App" $(parseRoutesFile "config/routes") +mkYesodData "App" $(parseRoutesFile "th/routes") -- | A convenient synonym for creating forms. type Form a = Html -> MForm (HandlerFor App) (FormResult a, Widget) diff --git a/src/Vervis/Model.hs b/src/Vervis/Model.hs index c7da8e4..0f593c3 100644 --- a/src/Vervis/Model.hs +++ b/src/Vervis/Model.hs @@ -1,6 +1,7 @@ {- This file is part of Vervis. - - - Written in 2016, 2018, 2019, 2020 by fr33domlover . + - Written in 2016, 2018, 2019, 2020, 2022 + - by fr33domlover . - - ♡ Copying is an act of love. Please copy, reuse and share. - @@ -49,7 +50,7 @@ import Vervis.Model.Workflow type PersistActivity = PersistJSON (Doc Activity URIMode) -makeEntities $(modelFile "config/models") +makeEntities $(modelFile "th/models") instance PersistUserCredentials Person where userUsernameF = PersonLogin diff --git a/config/models b/th/models similarity index 100% rename from config/models rename to th/models diff --git a/config/routes b/th/routes similarity index 100% rename from config/routes rename to th/routes