diff --git a/Handler/Hoogle.hs b/Handler/Hoogle.hs
index 4f23636..4caf536 100644
--- a/Handler/Hoogle.hs
+++ b/Handler/Hoogle.hs
@@ -136,7 +136,7 @@ runHoogleQuery heDatabase HoogleQueryInput {..} =
             mcount  = spoon $ limitedLength 0 rawRes
             limitedLength x [] = Just x
             limitedLength x (_:rest)
-                | x >= 100 = Nothing
+                | x >= 20 = Nothing
                 | otherwise = limitedLength (x + 1) rest
             rendered = pack $ Hoogle.showTagHTML $ Hoogle.renderQuery query''
         return $ case (,) <$> mres <*> mcount of