style(tooltips): remove info grey style and update admin page
This commit is contained in:
parent
e1b7170259
commit
74022b9305
@ -31,9 +31,6 @@
|
||||
font-size: 15px;
|
||||
}
|
||||
|
||||
&.tooltip__handle.urgency__info {
|
||||
color: var(--color-info);
|
||||
}
|
||||
&.tooltip__handle.urgency__success {
|
||||
color: var(--color-success);
|
||||
}
|
||||
@ -47,9 +44,6 @@
|
||||
&:hover {
|
||||
color: var(--color-dark);
|
||||
|
||||
&.tooltip__handle.urgency__info {
|
||||
color: var(--color-info-dark);
|
||||
}
|
||||
&.tooltip__handle.urgency__success {
|
||||
color: var(--color-success-dark);
|
||||
}
|
||||
|
||||
@ -146,10 +146,14 @@ postAdminTestR = do
|
||||
$forall m <- msgs
|
||||
<li>#{m}
|
||||
|]
|
||||
let testTooltip = toWidget [whamlet|Hier könnte Ihr Tooltip stehen!|] :: WidgetFor UniWorX ()
|
||||
let msgCont = "Allerletzte Warnung!" :: Html
|
||||
msgStat = Warning
|
||||
let testTooltipMsg = toWidget [whamlet| So sehen aktuell Tooltips via iconTooltip aus. |] :: WidgetFor UniWorX ()
|
||||
|
||||
msgInfoTooltip <- messageI Info ("Info-Tooltip via messageI" :: Text)
|
||||
msgSuccessTooltip <- messageI Success ("Success-Tooltip via messageI" :: Text)
|
||||
msgWarningTooltip <- messageI Warning ("Warning-Tooltip via messageI" :: Text)
|
||||
msgErrorTooltip <- messageI Error ("Error-Tooltip via messageI" :: Text)
|
||||
|
||||
msgNonDefaultIconTooltip <- messageIconI Info IconEmail ("Info-Tooltip mit lustigem Icon" :: Text)
|
||||
|
||||
{- The following demonstrates the use of @massInput@.
|
||||
|
||||
|
||||
@ -8,8 +8,12 @@
|
||||
Der Handler sollte jeweils aktuelle Beispiele für alle möglichen Funktionalitäten enthalten, so dass man immer weiß, wo man nachschlagen kann.
|
||||
|
||||
<p>
|
||||
^{iconTooltip testTooltip Nothing}
|
||||
^{messageTooltip (Message msgStat msgCont Nothing)}
|
||||
^{iconTooltip testTooltipMsg Nothing}
|
||||
^{messageTooltip msgInfoTooltip}
|
||||
^{messageTooltip msgSuccessTooltip}
|
||||
^{messageTooltip msgWarningTooltip}
|
||||
^{messageTooltip msgErrorTooltip}
|
||||
^{messageTooltip msgNonDefaultIconTooltip}
|
||||
|
||||
<p>
|
||||
<span .tooltip>
|
||||
|
||||
Loading…
Reference in New Issue
Block a user