Garmelon/profold
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Clean up alignment

Browse source
This commit is contained in:
Joscha 2020-03-29 11:49:19 +00:00
parent eb5edce734
commit 84004eb65b
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
app/Main.hs
View file

@ -15,5 +15,5 @@ main = do
let filename = optFileName opts let filename = optFileName opts
text <- T.readFile filename text <- T.readFile filename
case parseProfFile filename text of case parseProfFile filename text of
Left e -> putStrLn e Left e -> putStrLn e
Right f -> void $ defaultMain myApp $ newUiState (profInfoLines f) (profNode f) Right f -> void $ defaultMain myApp $ newUiState (profInfoLines f) (profNode f)