diff --git a/app/Main.hs b/app/Main.hs
index e58d042..a3e198a 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -15,5 +15,5 @@ main = do
   let filename = optFileName opts
   text <- T.readFile filename
   case parseProfFile filename text of
-    Left e     -> putStrLn e
+    Left e  -> putStrLn e
     Right f -> void $ defaultMain myApp $ newUiState (profInfoLines f) (profNode f)