Improve styling of search results

Author: hilverd

src/Data/GlossaryItem/Details.elm

@@ -154,7 +154,7 @@ viewInline enableMathSupport additionalAttributes details =
                     case Renderer.render (MarkdownRenderers.inlineHtmlMsgRenderer enableMathSupport) blocks of
                         Ok rendered ->
                             Html.span
-                                (class "prose print:prose-neutral dark:prose-invert dark:prose-pre:text-gray-200 prose-code:before:hidden prose-code:after:hidden leading-normal" :: additionalAttributes)
+                                (class "prose opacity-75 print:prose-neutral dark:prose-invert dark:prose-pre:text-gray-200 prose-code:before:hidden prose-code:after:hidden leading-normal" :: additionalAttributes)
                                 rendered
 
                         Err renderingError ->

src/MarkdownRenderers.elm

@@ -128,7 +128,7 @@ Block elements are either ignored or have their children wrapped in a <span>.
 inlineHtmlMsgRenderer : Bool -> Renderer (Html msg)
 inlineHtmlMsgRenderer enableMathSupport =
     { heading = \{ children } -> Html.span [] children
-    , paragraph = Html.span []
+    , paragraph = Html.span [ class "mr-1" ]
     , hardLineBreak = Html.text ""
     , blockQuote = Html.span []
     , strong = Html.strong []

src/Search.elm

@@ -65,8 +65,8 @@ search enableMathSupport searchString glossaryItems =
                             , Extras.Html.showMaybe
                                 (\details ->
                                     Html.div
-                                        [ class "truncate" ]
-                                        [ Details.viewInline enableMathSupport [ class "text-sm" ] details
+                                        [ class "overflow-hidden whitespace-nowrap" ]
+                                        [ Details.viewInline enableMathSupport [] details
                                         ]
                                 )
                                 maybeDetails

tests/MarkdownRenderersTests.elm

@@ -77,7 +77,8 @@ e = mc^2
                             )
                         |> Expect.equal
                             (Ok
-                                [ Html.p [ class "max-w-prose print:max-w-full" ]
+                                [ Html.p
+                                    [ class "max-w-prose print:max-w-full" ]
                                     [ Html.node "katex-inline"
                                         [ Attr.attribute "data-expr" "e = mc^2" ]
                                         []
@@ -94,7 +95,8 @@ e = mc^2
                         |> Result.andThen (Renderer.render (MarkdownRenderers.inlineHtmlMsgRenderer True))
                         |> Expect.equal
                             (Ok
-                                [ Html.span []
+                                [ Html.span
+                                    [ class "mr-1" ]
                                     [ Html.node "katex-inline"
                                         [ Attr.attribute "data-expr" "e = mc^2" ]
                                         []