@@ -66,21 +66,16 @@ toReport :: Exit -> Help.Report
66toReport exit =
66toReport exit =
67 case exit of
67 case exit of
68 NoElmJson ->
68 NoElmJson ->
69− Help.report "WELCOME" Nothing
69+ Help.report "NO elm.json FILE" Nothing
70− "It looks like you are trying to start a new Elm project. Very exciting! :D"
70+ "I cannot continue without an elm.json file. Read more about them here:"
71− [ D.fillSep
71+ [ D.indent 4 $ D.vcat $ map D.fromString $
72− ["I","very","highly","recommend","working","through"
72+ [ D.makeLink "elm.json/application.md"
73− ,D.green "<https://guide.elm-lang.org>","which","will","teach","you","the"
73+ , D.makeLink "elm.json/package.md"
74− ,"basics","of","Elm,","including","how","to","start","new","projects."
77− ["For","folks","who","have","already","built","stuff","with","Elm,","the"
78− ,"problem","is","just","that","there","is","no",D.dullyellow "elm.json","yet."
79− ,"If","you","want","to","work","from","an","example,","check","out","the"
75+ , "And if you would rather work from a larger example, check out:"
80− ,"one","at","<https://github.com/evancz/elm-todomvc/blob/master/elm.json>"
76+ , D.indent 4 $ D.vcat $ map D.fromString $
77+ [ D.makeLink "todomvc"
83− "Whatever your scenario, I hope you have a lovely time using Elm!"
86 Assets assetExit ->
81 Assets assetExit ->