diff --git a/hindent.cabal b/hindent.cabal
--- a/hindent.cabal
+++ b/hindent.cabal
@@ -1,5 +1,5 @@
 name:                hindent
-version:             4.5.2
+version:             4.5.3
 synopsis:            Extensible Haskell pretty printer
 description:         Extensible Haskell pretty printer. Both a library and an executable.
                      .
diff --git a/src/HIndent/Styles/JohanTibell.hs b/src/HIndent/Styles/JohanTibell.hs
--- a/src/HIndent/Styles/JohanTibell.hs
+++ b/src/HIndent/Styles/JohanTibell.hs
@@ -103,7 +103,7 @@
               (do prefixedLined
                     ","
                     (map (\p ->
-                            do space
+                            do space 
                                pretty p)
                          stmts))
      inCase <- gets psInsideCase
@@ -205,12 +205,11 @@
 exp (RecUpdate _ exp updates) = recUpdateExpr (pretty exp) updates
 exp (RecConstr _ qname updates) = recUpdateExpr (pretty qname) updates
 exp (Let _ binds e) =
-  do newline   -- Make the let swing under.
-     depend (write "let ")
-            (do pretty binds
-                newline
-                indented (-4) (depend (write "in ")
-                                      (pretty e)))
+  depend (write "let ")
+         (do pretty binds
+             newline
+             indented (-4) (depend (write "in ")
+                                   (pretty e)))
 exp e = prettyNoExt e
 
 match :: Match NodeInfo -> Printer s ()
diff --git a/test/johan-tibell/expected/7.exp b/test/johan-tibell/expected/7.exp
--- a/test/johan-tibell/expected/7.exp
+++ b/test/johan-tibell/expected/7.exp
@@ -1,11 +1,9 @@
 g x = 
-    
     let x = 
             1
     in x
   where
     foo = 
-        
         let y = 
                 2
             z =