Emi
/
aviary-ps
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Made the GError display prettier

This commit is contained in:
Emi Simpson 2022-11-16 17:50:33 -05:00
parent eef0a5a653
commit 71229e2339
Signed by: Emi
GPG Key ID: A12F2C2FFDC3D847
2 changed files with 19 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
dist/www/index.html vendored
View File

@ -141,11 +141,24 @@ p {
display: grid;
align-items: center;
justify-content: center;
text-align: center;
height: 100vh;
}
.uh-oh-stinky > p {
.uh-oh-stinky > div {
border: 4px solid red;
max-width: 575px;
background-color: #311725;
border-radius: 20px;
}
.uh-oh-stinky > div > h1 {
font-size: 150px;
color: red;
margin-top: 40px;
}
.uh-oh-stinky > div > p {
max-width: 50vw;
text-align: center;
margin-bottom: 80px;
line-height: 1.3;
}
/* Yoinked from https://codepen.io/AdamDipinto/pen/eYOaGvY

5
src/UI.purs
View File

@ -143,7 +143,10 @@ render :: forall m. Model -> H.ComponentHTML Event () m
render (GError e) = HH.div
[ HP.class_ $ ClassName "uh-oh-stinky"
]
[ HH.p_ [ HH.text $ show e ]
[ HH.div_
[ HH.h1_ [ HH.text "⚠" ]
, HH.p_ [ HH.text $ show e ]
]
]
render (GLoaded {title, desc, images, focus}) = HH.div_
((maybe [] (HH.text >>> pure >>> HH.h1_ >>> pure) title) <>