diff --git a/modules/webapp/src/main/elm/Comp/ItemCard.elm b/modules/webapp/src/main/elm/Comp/ItemCard.elm index 4daaee4b..0a54f958 100644 --- a/modules/webapp/src/main/elm/Comp/ItemCard.elm +++ b/modules/webapp/src/main/elm/Comp/ItemCard.elm @@ -279,7 +279,7 @@ viewRow texts cfg settings flags model item = in div ([ classList [ ( "border border-gray-800 border-dashed dark:border-lightblue-500", isMultiSelectMode cfg ) ] - , class "flex flex-col border-b pb-1 dark:border-bluegray-600 ds-item-row relative " + , class "flex flex-col dark:border-bluegray-600 ds-item-row relative " , class cfg.extraClasses , id item.id ] @@ -300,7 +300,7 @@ viewRow texts cfg settings flags model item = ] , div [ class "flex flex-grow flex-col truncate text-left" ] [ div - [ class "truncate w-full text-lg pointer font-medium" + [ class "truncate w-full text-black dark:text-white pointer font-medium pt-1" ] [ trashIcon , newIcon @@ -329,7 +329,7 @@ viewRow texts cfg settings flags model item = ] ] , div - [ class "opacity-75 truncate flex flex-row items-center" + [ class "opacity-75 truncate flex flex-row items-center text-sm -mt-1" , classList [ ( "hidden", IT.render subtitleTemplate (templateCtx texts) item == "" ) ] diff --git a/modules/webapp/src/main/elm/Comp/ItemCardList.elm b/modules/webapp/src/main/elm/Comp/ItemCardList.elm index 9edce050..0d66509b 100644 --- a/modules/webapp/src/main/elm/Comp/ItemCardList.elm +++ b/modules/webapp/src/main/elm/Comp/ItemCardList.elm @@ -200,7 +200,7 @@ viewList texts cfg settings flags model = (List.map (viewGroup texts model cfg settings flags) model.results.groups) else - div [ class listingCss ] + div [ class (itemContainerCss cfg) ] (List.map (viewItem texts model cfg settings flags) items) @@ -211,7 +211,7 @@ itemContainerCss cfg = "grid grid-cols-1 md:grid-cols-2 lg:grid-cols-3 2xl:grid-cols-4 gap-2" Data.ItemArrange.List -> - "flex flex-col space-y-1" + "flex flex-col divide-y" viewCards : Texts -> ViewConfig -> UiSettings -> Flags -> Model -> Html Msg @@ -283,7 +283,7 @@ viewItem texts model cfg settings flags item = itemClass = case cfg.arrange of Data.ItemArrange.List -> - " mb-1" + " py-1 " Data.ItemArrange.Cards -> ""