Use smaller twitter card for pages with elm-pages icon as logo.

dillonkearns · Jan 28, 2020 · 1e0ceb7 · 1e0ceb7
1 parent 76e32ad
commit 1e0ceb7
Showing 1 changed file with 9 additions and 5 deletions.
diff --git a/examples/docs/src/Main.elm b/examples/docs/src/Main.elm
@@ -414,6 +414,10 @@ header stars currentPath =
                 ]
                 [ logoLink
                 , Element.row [ Element.spacing 15 ] (navbarLinks stars currentPath)
+                , Element.link []
+                    { url = "/doesnt-exist.pdf"
+                    , label = Element.text "Pdf"
+                    }
                 ]
             ]
         ]
@@ -511,7 +515,7 @@ head metadata =
     commonHeadTags
         ++ (case metadata of
                 Metadata.Page meta ->
-                    Seo.summaryLarge
+                    Seo.summary
                         { canonicalUrlOverride = Nothing
                         , siteName = "elm-pages"
                         , image =
@@ -527,7 +531,7 @@ head metadata =
                         |> Seo.website
 
                 Metadata.Doc meta ->
-                    Seo.summaryLarge
+                    Seo.summary
                         { canonicalUrlOverride = Nothing
                         , siteName = "elm-pages"
                         , image =
@@ -600,7 +604,7 @@ head metadata =
                             }
 
                 Metadata.BlogIndex ->
-                    Seo.summaryLarge
+                    Seo.summary
                         { canonicalUrlOverride = Nothing
                         , siteName = "elm-pages"
                         , image =
@@ -616,7 +620,7 @@ head metadata =
                         |> Seo.website
 
                 Metadata.Showcase ->
-                    Seo.summaryLarge
+                    Seo.summary
                         { canonicalUrlOverride = Nothing
                         , siteName = "elm-pages"
                         , image =
@@ -625,7 +629,7 @@ head metadata =
                             , dimensions = Nothing
                             , mimeType = Nothing
                             }
-                        , description = siteTagline
+                        , description = "See some neat sites built using elm-pages! (Or submit yours!)"
                         , locale = Nothing
                         , title = "elm-pages sites showcase"
                         }