diff --git a/System/Console/Terminfo/PrettyPrint.hs b/System/Console/Terminfo/PrettyPrint.hs
--- a/System/Console/Terminfo/PrettyPrint.hs
+++ b/System/Console/Terminfo/PrettyPrint.hs
@@ -197,7 +197,7 @@
 kludgeWindowSize = do
    _ <- initScr
    s <- snd <$> scrSize
-   guard $ s >= 30 && s < 320
+   s <$ guard (s >= 30 && s < 320)
  `finally` endWin
 
 displayLn :: PrettyTerm t => t -> IO ()
diff --git a/wl-pprint-terminfo.cabal b/wl-pprint-terminfo.cabal
--- a/wl-pprint-terminfo.cabal
+++ b/wl-pprint-terminfo.cabal
@@ -1,6 +1,6 @@
 name:          wl-pprint-terminfo
 category:      Control, Monads, Text
-version:       0.5
+version:       0.5.1
 cabal-version: >= 1.6
 license:       BSD3
 license-file:  LICENSE