fix spacing

This commit is contained in:
Rhiannon Morris 2024-11-28 17:44:41 +01:00
parent a2fc6c9f28
commit a7bbfd5035
2 changed files with 1 additions and 2 deletions

View file

@ -46,7 +46,7 @@ lang' txt₀ = case ?lang of
Just Lántas Just Lántas
| Just li@(Item {..}) <- splitItem txt, | Just li@(Item {..}) <- splitItem txt,
let label = Span (cls ["text"]) $ underlines title -> let label = Span (cls ["text"]) $ underlines title ->
if showText then [makeItem li, label] else [makeItem li] if showText then [makeItem li, Str " ", label] else [makeItem li]
_ -> underlines txt _ -> underlines txt
notBrace :: Char -> Bool notBrace :: Char -> Bool

View file

@ -147,7 +147,6 @@ pre {
.scr { .scr {
height: 1.5em; height: 1.5em;
vertical-align: -40%; vertical-align: -40%;
padding-right: 0.5ex;
} }
.gloss .scr { .gloss .scr {