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 li@(Item {..}) <- splitItem txt,
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
notBrace :: Char -> Bool

View file

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