chore: correct button classes

This commit is contained in:
Wolfgang Witt 2021-03-18 12:37:15 +01:00 committed by Gregor Kleen
parent 65d0f24d71
commit 13af035223

View File

@ -47,6 +47,8 @@ embedRenderMessage ''UniWorX ''ExamAutoOccurrenceButton id
instance Button UniWorX ExamAutoOccurrenceButton where
btnClasses BtnExamAutoOccurrenceNudgeUp = [BCIsButton]
btnClasses BtnExamAutoOccurrenceNudgeDown = [BCIsButton]
btnClasses BtnExamAutoOccurrenceIgnore = [BCIsButton]
btnClasses BtnExamAutoOccurrenceReconsider = [BCIsButton]
btnClasses _ = [BCIsButton, BCPrimary]