Formats repo

This commit is contained in:
2026-05-26 07:39:28 -04:00
parent 0643dda10d
commit 162d2f8a1e
+2 -7
View File
@@ -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
-- ---------------------------------------------------------------------------