From 6689dcc862aa04e51cb5c2cfd325bec89f29a5f5 Mon Sep 17 00:00:00 2001
From: Brian Hicks <brian@brianthicks.com>
Date: Mon, 5 Oct 2020 05:45:36 -0500
Subject: [PATCH] add mediumBodyGray

---
 src/Nri/Ui/Text/V5.elm | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/src/Nri/Ui/Text/V5.elm b/src/Nri/Ui/Text/V5.elm
index 51abafd3..1ca1b12e 100644
--- a/src/Nri/Ui/Text/V5.elm
+++ b/src/Nri/Ui/Text/V5.elm
@@ -1,5 +1,5 @@
 module Nri.Ui.Text.V5 exposing
-    ( caption, mediumBody, smallBody, smallBodyGray
+    ( caption, mediumBody, mediumBodyGray, smallBody, smallBodyGray
     , ugMediumBody, ugSmallBody
     , Attribute, noBreak, css
     , noWidow
@@ -48,7 +48,7 @@ API. See the Nri.Ui.Heading.V2 docs for details.
 
 ## Paragraph styles
 
-@docs caption, mediumBody, smallBody, smallBodyGray
+@docs caption, mediumBody, mediumBodyGray, smallBody, smallBodyGray
 
 
 ## User-authored content blocks:
@@ -142,6 +142,13 @@ mediumBody attributes content =
         content
 
 
+{-| `mediumBody`, but with a lighter gray color than the default.
+-}
+mediumBodyGray : List Attribute -> List (Html msg) -> Html msg
+mediumBodyGray attributes content =
+    mediumBody (css [ Css.color gray45 ] :: attributes) content
+
+
 {-| This is some small body copy.
 -}
 smallBody : List Attribute -> List (Html msg) -> Html msg