Put the :help and :exit words back in the REPL line

evancz · evancz · commit f5d00e55c1f7 · 2018-08-28T14:39:45.000-04:00
Found a way to fit all the chars
diff --git a/ui/terminal/src/Repl.hs b/ui/terminal/src/Repl.hs
@@ -328,7 +328,7 @@ printWelcomeMessage =
   D.toAnsi IO.stdout $
     D.vcat
       [ D.black "----" <+> D.dullcyan title <+> D.black (D.fromString dashes)
-      , D.black $ D.fromString $ "Read " <> D.makeLink "repl" <> " to learn more: exit, help, imports, etc."
+      , D.black $ D.fromString $ "Say :help for help and :exit to exit! More at " <> D.makeLink "repl"
       , D.black "--------------------------------------------------------------------------------"
       , D.empty
       ]

Original file line number	Diff line number	Diff line change
`@@ -328,7 +328,7 @@ printWelcomeMessage =`
`328`	`328`	`D.toAnsi IO.stdout $`
`329`	`329`	`D.vcat`
`330`	`330`	`[ D.black "----" <+> D.dullcyan title <+> D.black (D.fromString dashes)`
`331`		`- , D.black $ D.fromString $ "Read " <> D.makeLink "repl" <> " to learn more: exit, help, imports, etc."`
	`331`	`+ , D.black $ D.fromString $ "Say :help for help and :exit to exit! More at " <> D.makeLink "repl"`
`332`	`332`	`, D.black "--------------------------------------------------------------------------------"`
`333`	`333`	`, D.empty`
`334`	`334`	`]`