Merge branch '89.get-modal-shadowing-back' into 'main'

Get modal dialog shadow back

Closes #89

See merge request !82

obelisk/frontend/src/Pages/MagicFolders.hs

@@ -232,6 +232,7 @@ mdcDialog visible title content actions =
             actionsValue <- divClass "mdc-dialog__actions" actions
             pure (contentValue, actionsValue)
           pure (titleValue, contentValue, actionsValue)
+      <* divClass "mdc-dialog__scrim" blank
 
     where
       topLevelDynAttrs = attributes' <$> visible
@@ -303,7 +304,6 @@ receiveFolderInviteText visible = do
           inviteCodeEv = tag (current (_inputElement_value inputEl)) goAheadEv
           inviteFinishedEv = leftmost [Left <$> domEvent Click closeButton, Right <$> inviteCodeEv]
 
-      divClass "mdc-dialog__scrim" blank
       pure inviteFinishedEv
 
 -- | Create a text input element for a magic-wormhole code suitable for use with an `MDCDialog`.