From cef407c31b560d85ddc99bdddb9e9ad2d73ff7a3 Mon Sep 17 00:00:00 2001
From: James Brechtel <git@jamesbrechtel.com>
Date: Tue, 19 May 2026 22:00:46 -0400
Subject: [PATCH] fix: escape single quotes in JS renderFlatList string

Haskell\'s \' within double-quoted string literals is interpreted as
just \' (no-op escape). Switched to \\' to produce \' in the JS
output, which correctly escapes the single quotes inside the
single-quoted JS string literal for the CSS class name.
---
 src/Roux/Html.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Roux/Html.hs b/src/Roux/Html.hs
index c09601b..d9e68c6 100644
--- a/src/Roux/Html.hs
+++ b/src/Roux/Html.hs
@@ -254,7 +254,7 @@ searchJs =
         , ""
         , "function renderFlatList(items) {"
         , "  if (items.length === 0) return '<p>No recipes found.</p>';"
-        , "  let html = '<ul class=\'roux-recipes\'>';"
+        , "  let html = '<ul class=\\'roux-recipes\\'>';"
         , "  items.forEach(r => {"
         , "    html += '<li><a href=\"/recipes/' + encodeURIComponent(r.filename) + '\">' + escapeHtml(r.title) + '</a></li>';"
         , "  });"