Commit ea2b3454 authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Clarify an error message.

parent e3603acd
...@@ -302,8 +302,10 @@ configureProgram verbosity prog conf = do ...@@ -302,8 +302,10 @@ configureProgram verbosity prog conf = do
then return (Just (UserSpecified path)) then return (Just (UserSpecified path))
else findProgramOnSearchPath verbosity (progSearchPath conf) path else findProgramOnSearchPath verbosity (progSearchPath conf) path
>>= maybe (die notFound) (return . Just . UserSpecified) >>= maybe (die notFound) (return . Just . UserSpecified)
where notFound = "Cannot find the program '" ++ name ++ "' at '" where notFound = "Cannot find the program '" ++ name
++ path ++ "' or on the path" ++ "'. User-specified path '"
++ path ++ "' does not refer to an executable and "
++ "the program is not on the system path."
case maybeLocation of case maybeLocation of
Nothing -> return conf Nothing -> return conf
Just location -> do Just location -> do
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment