Move models and routes files from config/ to new th/ dir

This commit is contained in:
fr33domlover 2022-07-25 18:40:36 +00:00
parent 066285d3a3
commit 91b2d36a19
4 changed files with 4 additions and 3 deletions

View file

@ -151,7 +151,7 @@ type PatchKeyHashid = KeyHashid Patch
getDvara :: App -> Dvara getDvara :: App -> Dvara
getDvara = const dvara getDvara = const dvara
mkYesodData "App" $(parseRoutesFile "config/routes") mkYesodData "App" $(parseRoutesFile "th/routes")
-- | A convenient synonym for creating forms. -- | A convenient synonym for creating forms.
type Form a = Html -> MForm (HandlerFor App) (FormResult a, Widget) type Form a = Html -> MForm (HandlerFor App) (FormResult a, Widget)

View file

@ -1,6 +1,7 @@
{- This file is part of Vervis. {- This file is part of Vervis.
- -
- Written in 2016, 2018, 2019, 2020 by fr33domlover <fr33domlover@riseup.net>. - Written in 2016, 2018, 2019, 2020, 2022
- by fr33domlover <fr33domlover@riseup.net>.
- -
- Copying is an act of love. Please copy, reuse and share. - 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) type PersistActivity = PersistJSON (Doc Activity URIMode)
makeEntities $(modelFile "config/models") makeEntities $(modelFile "th/models")
instance PersistUserCredentials Person where instance PersistUserCredentials Person where
userUsernameF = PersonLogin userUsernameF = PersonLogin