fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

mend

Browse Source
This commit is contained in:
SJost 2019-03-13 21:18:38 +01:00
parent 86086633ab
commit 40204d2424
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Handler/Admin.hs
View File

@ -223,8 +223,8 @@ postAdminFeaturesR = do
<ul> <ul>
$forall (Entity _ (StudyTerms ky _ nm)) <- conflicts $forall (Entity _ (StudyTerms ky _ nm)) <- conflicts
<li> #{show ky} - #{foldMap id nm} <li> #{show ky} - #{foldMap id nm}
<div .container>
^{candidateTable} ^{candidateTable}
|] |]
where where
textInputCell lensRes lensDefault = formCell id (return . view (_dbrOutput . _entityKey)) textInputCell lensRes lensDefault = formCell id (return . view (_dbrOutput . _entityKey))