fix spacing
This commit is contained in:
parent
a2fc6c9f28
commit
a7bbfd5035
2 changed files with 1 additions and 2 deletions
|
@ -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
|
||||||
|
|
|
@ -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 {
|
||||||
|
|
Loading…
Add table
Reference in a new issue