diff --git a/obelisk/frontend/src/Pages/MagicFolders.hs b/obelisk/frontend/src/Pages/MagicFolders.hs index 4f2819260acddc504a7fd18686dc1625338d1011..6412846d507d889c30fd988810d055532f437c81 100644 --- a/obelisk/frontend/src/Pages/MagicFolders.hs +++ b/obelisk/frontend/src/Pages/MagicFolders.hs @@ -65,9 +65,10 @@ magicFolders folders = do dyn_ $ receiveFolderInviteUI <$> acceptInviteState - -- | A modal dialogue asking for a wormhole code. - -- Auto-initialize in "closed" state, then change class to "mdc-dialog--open" to show - -- the dialog in a modal fashion (with an overlay temporarily disabling all other elements). + -- A modal dialogue asking for a wormhole code. + -- Auto-initialize in "closed" state, then change class to + -- "mdc-dialog--open" to show the dialog in a modal fashion (with an + -- overlay temporarily disabling all other elements). elAttr "div" ("id" =: "wormhole-code-dialog" <> "class" =: "mdc-dialog mdc-dialog--closed" <> "data-mdc-auto-init" =: "MDCDialog") $ do divClass "mdc-dialog__container" $ divClass "mdc-dialog__surface" $ do