Skip to content

Commit

Permalink
fix #70
Browse files Browse the repository at this point in the history
  • Loading branch information
Yatao Li committed Sep 22, 2019
1 parent 58a79d3 commit 623bf52
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 1 deletion.
4 changes: 3 additions & 1 deletion states.fs
Original file line number Diff line number Diff line change
Expand Up @@ -168,7 +168,9 @@ let parseLineHeightOption (v: obj) =
elif v.ToLowerInvariant() = "default" then
Some Default
else
Some(Absolute(float v))
let v = float v
if v > 0.0 then Some(Absolute v)
else None
| _ -> None

let Shutdown code = _appLifetime.Shutdown code
Expand Down
1 change: 1 addition & 0 deletions ui.fs
Original file line number Diff line number Diff line change
Expand Up @@ -300,6 +300,7 @@ module ui =
| States.Default -> float paint.FontSpacing
| States.Add h' -> (float paint.FontSpacing) + h'
let h' = round(h'' * scaling) / scaling
let h' = max h' 1.0

// calculate score
let score' =
Expand Down

0 comments on commit 623bf52

Please sign in to comment.