@@ -113,7 +113,7 @@ function findManualExecutable(logger: Logger, uri: Uri, folder?: WorkspaceFolder
113
113
if ( ! executableExists ( exePath ) ) {
114
114
let msg = `serverExecutablePath is set to ${ exePath } ` ;
115
115
if ( directoryExists ( exePath ) ) {
116
- msg += ' but it is a directory and the config option should point to the executable full path' ;
116
+ msg += ' but it is a directory and the config option should point to the executable file full path' ;
117
117
} else {
118
118
msg += " but it doesn't exist and it is not on the PATH" ;
119
119
}
@@ -126,6 +126,7 @@ function findManualExecutable(logger: Logger, uri: Uri, folder?: WorkspaceFolder
126
126
function findLocalServer ( context : ExtensionContext , logger : Logger , uri : Uri , folder ?: WorkspaceFolder ) : string | null {
127
127
const exes : string [ ] = [ 'haskell-language-server-wrapper' , 'haskell-language-server' ] ;
128
128
logger . info ( `Searching for server executables ${ exes . join ( ',' ) } in $PATH` ) ;
129
+ logger . info ( `$PATH environment variable: ${ process . env . PATH } ` ) ;
129
130
for ( const exe of exes ) {
130
131
if ( executableExists ( exe ) ) {
131
132
logger . info ( `Found server executable in $PATH: ${ exe } ` ) ;
@@ -174,6 +175,11 @@ async function activateServerForFolder(context: ExtensionContext, uri: Uri, fold
174
175
175
176
const logger : Logger = new ExtensionLogger ( 'client' , clientLogLevel , outputChannel ) ;
176
177
178
+ logger . info ( 'Environment variables:' ) ;
179
+ Object . entries ( process . env ) . forEach ( ( [ key , value ] : [ string , string | undefined ] ) => {
180
+ logger . info ( ` ${ key } : ${ value } ` ) ;
181
+ } ) ;
182
+
177
183
let serverExecutable ;
178
184
try {
179
185
// Try and find local installations first
0 commit comments