From 84004eb65bea9097905617f6e64ad11eca66755d Mon Sep 17 00:00:00 2001 From: Joscha Date: Sun, 29 Mar 2020 11:49:19 +0000 Subject: [PATCH] Clean up alignment --- app/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)