diff --git a/ParseHtml.hs b/ParseHtml.hs
index 6c7594f..7ca4d6f 100644
--- a/ParseHtml.hs
+++ b/ParseHtml.hs
@@ -42,7 +42,7 @@ printDef :: T.Text -> Int -> IO ()
 printDef t n = putStrLn (getDef t n)
 
 getDef :: T.Text -> Int -> String
-getDef t n = renderFullDef (getFullDef t n)
+getDef t n = renderFullDef $ getFullDef t n
 
 getFullDef :: T.Text -> Int -> WordFullDef
 getFullDef t n = WordFullDef header defList