diff options
| -rw-r--r-- | ibb/Main.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ibb/Main.hs b/ibb/Main.hs index 05e7738..b24c822 100644 --- a/ibb/Main.hs +++ b/ibb/Main.hs @@ -34,7 +34,7 @@ routes = do displayPerson :: Person -> Markup displayPerson person = [shamlet| -<div .card .mx-3 .my-5 .w-25 .h-25> +<div .card> <img .card-img .img-fluid src=#{_pic person}> <div .card-body> <h4 .card-title> @@ -58,6 +58,8 @@ homepage :: Markup homepage = [shamlet| <!doctype html> <head> + <meta charset="utf-8"> + <meta name="viewport" content="width=device-width, initial-scale=1, shrink-to-fit=no"> <link href="https://stackpath.bootstrapcdn.com/bootstrap/4.2.1/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-GJzZqFGwb1QTTN6wy59ffF1BuGJpLSa9DkKMp0DgiMDm4iYMj70gZWKYbI706tWS" @@ -80,7 +82,7 @@ homepage = [shamlet| <a href="http://eepurl.com/ghBFjv"> Get new book recommendations from the world's influencers in your email. - <div .d-flex .flex-wrap .justify-content-around> + <div .card-columns> $forall person <- allPeople #{displayPerson person} |] |