From 62479374cf6dfd0e7f57ec20e1131b1673a76eec Mon Sep 17 00:00:00 2001
From: Eric Ahlberg <eahlberg@gmail.com>
Date: Wed, 18 Nov 2020 19:22:17 +0100
Subject: [PATCH] Use property attribute instead of name

---
 yesod-core/src/Yesod/Core/Widget.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/yesod-core/src/Yesod/Core/Widget.hs b/yesod-core/src/Yesod/Core/Widget.hs
index 0f354209..20569790 100644
--- a/yesod-core/src/Yesod/Core/Widget.hs
+++ b/yesod-core/src/Yesod/Core/Widget.hs
@@ -226,7 +226,7 @@ setDescriptionI msg = do
 --
 -- @since 1.6.18
 setOGType :: MonadWidget m => Text -> m ()
-setOGType a = toWidgetHead $ [hamlet|<meta name="og:type" content=#{a}>|]
+setOGType a = toWidgetHead $ [hamlet|<meta property="og:type" content=#{a}>|]
 
 -- | Add OpenGraph image meta tag to the head of the page
 --
@@ -241,7 +241,7 @@ setOGType a = toWidgetHead $ [hamlet|<meta name="og:type" content=#{a}>|]
 --
 -- @since 1.6.18
 setOGImage :: MonadWidget m => Text -> m ()
-setOGImage a = toWidgetHead $ [hamlet|<meta name="og:image" content=#{a}>|]
+setOGImage a = toWidgetHead $ [hamlet|<meta property="og:image" content=#{a}>|]
 
 -- | Link to the specified local stylesheet.
 addStylesheet :: MonadWidget m => Route (HandlerSite m) -> m ()