From 162d2f8a1e108327c1a8f7dceb21923a7a582634 Mon Sep 17 00:00:00 2001 From: James Brechtel Date: Tue, 26 May 2026 07:39:28 -0400 Subject: [PATCH] Formats repo --- src/Roux/Html.hs | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/src/Roux/Html.hs b/src/Roux/Html.hs index 3ed83d6..0572c52 100644 --- a/src/Roux/Html.hs +++ b/src/Roux/Html.hs @@ -60,8 +60,6 @@ newtype ImportError = ImportError Text -- Helpers used throughout -- --------------------------------------------------------------------------- - - {- | Format a quantity for display. | Format a quantity for natural display (e.g. @4 cups@, @1/2 tsp@). -} @@ -887,13 +885,10 @@ recipePage info entries = H.script ! A.type_ "text/javascript" $ H.preEscapedText titleEditJs H.script ! A.type_ "text/javascript" $ H.preEscapedText cookLogJs - - -- | Format a Day as "Mon DD" e.g. "Mar 15". formatDay :: Day -> Text formatDay = T.pack . Time.formatTime Time.defaultTimeLocale "%b %e" - -- | Recipe page CSS matching the roux-recipe-mockup.html layout. recipePageStyles :: Text recipePageStyles = @@ -1017,7 +1012,8 @@ renderRecipe filename recipe entries = do -- Tags let tags = metaTags meta unless (null tags) $ - H.div ! A.class_ "rp-tags" $ mapM_ (\t -> H.span ! A.class_ "rp-tag" $ H.toHtml t) tags + H.div ! A.class_ "rp-tags" $ + mapM_ (\t -> H.span ! A.class_ "rp-tag" $ H.toHtml t) tags -- Record meal modal (unchanged) H.div ! A.id "roux-record-modal" ! A.style "display: none;" $ do H.div ! A.class_ "roux-modal-backdrop" ! A.id "roux-modal-backdrop" $ "" @@ -1238,7 +1234,6 @@ renderStepItem (StepComment t) = renderStepItem StepBreak = H.br - -- --------------------------------------------------------------------------- -- URL encoding -- ---------------------------------------------------------------------------