diff --git a/src/Lisa/Views.hs b/src/Lisa/Views.hs
index 89c6d8e..214faab 100644
--- a/src/Lisa/Views.hs
+++ b/src/Lisa/Views.hs
@@ -8,7 +8,7 @@ import Control.Monad (forM_)
 import Data.List (intersperse)
 import Data.Text (Text, isInfixOf)
 import Network.Wai (Request)
-import Text.Blaze.Html5 hiding (map)
+import Text.Blaze.Html5 hiding (map, style)
 import Text.Blaze.Html5.Attributes hiding (form)
 
 import Lisa.Types (Session)
@@ -53,10 +53,10 @@ viewDebug request session = do
     h1 $ text "Debuginformation"
     fieldset $ do
         legend "Request"
-        pre $ string $ show request
+        pre ! style (textValue "white-space: pre-wrap") $ string $ show request
     fieldset $ do
         legend "Session"
-        pre $ string $ show session
+        pre ! style (textValue "white-space: pre-wrap") $ string $ show session
 
 viewSqueakError :: SqueakError -> Html
 viewSqueakError err = string $ show err