Remove deprecated search routes and some refactoring

This commit is contained in:
Eike Kettner
2021-03-27 22:03:43 +01:00
parent bd5dba9f8e
commit cc38b850a6
16 changed files with 167 additions and 507 deletions

View File

@ -473,6 +473,14 @@ view2 extraClasses settings model =
let
dimmerSettings =
Comp.YesNoDimmer.defaultSettings2 "Really delete this notification task?"
startOnceBtn =
MB.SecondaryButton
{ tagger = StartOnce
, label = "Start Once"
, title = "Start this task now"
, icon = Just "fa fa-play"
}
in
div
[ class "flex flex-col md:relative"
@ -501,7 +509,8 @@ view2 extraClasses settings model =
]
, end =
if model.settings.id /= "" then
[ MB.DeleteButton
[ startOnceBtn
, MB.DeleteButton
{ tagger = RequestDelete
, label = "Delete"
, title = "Delete this task"
@ -510,7 +519,8 @@ view2 extraClasses settings model =
]
else
[]
[ startOnceBtn
]
, rootClasses = "mb-4"
}
, div

View File

@ -221,6 +221,7 @@ view2 settings model =
, ( S.successMessage, Maybe.map .success model.result == Just True )
, ( "hidden", model.result == Nothing )
]
, class "mb-2"
]
[ Maybe.map .message model.result
|> Maybe.withDefault ""