diff --git a/src/Utils/Icon.hs b/src/Utils/Icon.hs index e401f2db7..f6a9d2329 100644 --- a/src/Utils/Icon.hs +++ b/src/Utils/Icon.hs @@ -86,6 +86,11 @@ data Icon | IconFileUploadSession | IconStandaloneFieldError | IconFileUser + | IconFastBackward + | IconBackward + | IconCurrent + | IconForward + | IconFastForward deriving (Eq, Ord, Enum, Bounded, Show, Read, Generic, Typeable) iconText :: Icon -> Text @@ -150,6 +155,11 @@ iconText = \case IconFileUploadSession -> "file-upload" IconStandaloneFieldError -> "exclamation" IconFileUser -> "file-user" + IconFastBackward -> "angle-double-left" + IconBackward -> "angle-left" + IconCurrent -> "circle" + IconForward -> "angle-right" + IconFastForward -> "angle-double-right" instance Universe Icon instance Finite Icon