mirror of
https://github.com/unisonweb/unison.git
synced 2024-10-05 06:07:21 +03:00
Update unison-cli/src/Unison/CommandLine/OutputMessages.hs
Co-authored-by: Arya Irani <538571+aryairani@users.noreply.github.com>
This commit is contained in:
parent
9b14cd4915
commit
19f1b365b6
@ -1640,6 +1640,7 @@ notifyUser dir o = case o of
|
||||
UnreachableCodeserver codeServerURL ->
|
||||
P.lines $
|
||||
[ P.wrap $ "Unable to reach the code server hosted at:" <> P.string (Servant.showBaseUrl codeServerURL),
|
||||
, ""
|
||||
P.wrap "Please check your network, ensure you've provided the correct location, or try again later."
|
||||
]
|
||||
InvalidResponse resp -> P.fatalCallout $ P.hang "Invalid response received from codeserver:" (P.shown resp)
|
||||
|
Loading…
Reference in New Issue
Block a user