@@ -110,27 +110,27 @@ async function getProjectGhcVersion(
110
110
return window . withProgress (
111
111
{
112
112
location : ProgressLocation . Notification ,
113
- title : title ,
113
+ title : ` ${ title } ` ,
114
114
cancellable : true ,
115
115
} ,
116
116
async ( progress , token ) => {
117
117
return new Promise < string > ( ( resolve , reject ) => {
118
118
const command : string = wrapper + ' --project-ghc-version' ;
119
- logger . info ( ' Executing ` ${command}` in cwd ${dir} to get the project ghc version' ) ;
119
+ logger . info ( ` Executing ' ${ command } ' in cwd ${ dir } to get the project ghc version` ) ;
120
120
token . onCancellationRequested ( ( ) => {
121
- logger . warn ( ' User canceled the executon of ` ${command}`' ) ;
121
+ logger . warn ( ` User canceled the executon of ' ${ command } '` ) ;
122
122
} ) ;
123
123
// Need to set the encoding to 'utf8' in order to get back a string
124
124
// We execute the command in a shell for windows, to allow use cmd or bat scripts
125
- let childProcess = child_process
125
+ const childProcess = child_process
126
126
. execFile (
127
127
command ,
128
- { encoding : 'utf8' , cwd : dir , shell : getGithubOS ( ) == 'Windows' } ,
128
+ { encoding : 'utf8' , cwd : dir , shell : getGithubOS ( ) === 'Windows' } ,
129
129
( err , stdout , stderr ) => {
130
130
if ( err ) {
131
- logger . error ( ' Error executing ` ${command}` with error code ${err.code}' ) ;
132
- logger . error ( ' stderr: ${stderr}' ) ;
133
- logger . error ( ' stdout: ${stdout}' ) ;
131
+ logger . error ( ` Error executing ' ${ command } ' with error code ${ err . code } ` ) ;
132
+ logger . error ( ` stderr: ${ stderr } ` ) ;
133
+ logger . error ( ` stdout: ${ stdout } ` ) ;
134
134
const regex = / C r a d l e r e q u i r e s ( .+ ) b u t c o u l d n ' t f i n d i t / ;
135
135
const res = regex . exec ( stderr ) ;
136
136
if ( res ) {
@@ -144,10 +144,10 @@ async function getProjectGhcVersion(
144
144
}
145
145
)
146
146
. on ( 'close' , ( code , signal ) => {
147
- logger . info ( ' Execution of ` ${command}` closed with code ${err. code} and signal ${signal}' ) ;
147
+ logger . info ( ` Execution of ' ${ command } ' closed with code ${ code } and signal ${ signal } ` ) ;
148
148
} )
149
149
. on ( 'error' , ( err ) => {
150
- logger . error ( ' Error execution ` ${command}` : name = ${err.name}, message = ${err.message}' ) ;
150
+ logger . error ( ` Error executing ' ${ command } ' : name = ${ err . name } , message = ${ err . message } ` ) ;
151
151
throw err ;
152
152
} ) ;
153
153
token . onCancellationRequested ( ( _ ) => childProcess . kill ( ) ) ;
@@ -305,8 +305,8 @@ export async function downloadHaskellLanguageServer(
305
305
window . showErrorMessage ( message ) ;
306
306
return null ;
307
307
}
308
- logger . info ( ' The latest release is ${release.tag_name}' ) ;
309
- logger . info ( ' Figure out the ghc version to use or advertise an installation link for missing components' ) ;
308
+ logger . info ( ` The latest release is ${ release . tag_name } ` ) ;
309
+ logger . info ( ` Figure out the ghc version to use or advertise an installation link for missing components` ) ;
310
310
const dir : string = folder ?. uri ?. fsPath ?? path . dirname ( resource . fsPath ) ;
311
311
let ghcVersion : string ;
312
312
try {
@@ -333,10 +333,12 @@ export async function downloadHaskellLanguageServer(
333
333
// When searching for binaries, use startsWith because the compression may differ
334
334
// between .zip and .gz
335
335
const assetName = `haskell-language-server-${ githubOS } -${ ghcVersion } ${ exeExt } ` ;
336
- logger . info ( ' Search for binary ${assetName} in release assests' ) ;
336
+ logger . info ( ` Search for binary ${ assetName } in release assests` ) ;
337
337
const asset = release ?. assets . find ( ( x ) => x . name . startsWith ( assetName ) ) ;
338
338
if ( ! asset ) {
339
- logger . error ( 'No binary ${assetName} found in the release assets: ' + release ?. assets . map ( ( value ) => value . name ) ) ;
339
+ logger . error (
340
+ `No binary ${ assetName } found in the release assets: ${ release ?. assets . map ( ( value ) => value . name ) . join ( ',' ) } `
341
+ ) ;
340
342
window . showInformationMessage ( new NoBinariesError ( release . tag_name , ghcVersion ) . message ) ;
341
343
return null ;
342
344
}
@@ -348,7 +350,7 @@ export async function downloadHaskellLanguageServer(
348
350
logger . info ( title ) ;
349
351
await downloadFile ( title , asset . browser_download_url , binaryDest ) ;
350
352
if ( ghcVersion . startsWith ( '9.' ) ) {
351
- let warning =
353
+ const warning =
352
354
'Currently, HLS supports GHC 9 only partially. ' +
353
355
'See [issue #297](https://github.com/haskell/haskell-language-server/issues/297) for more detail.' ;
354
356
logger . warn ( warning ) ;
0 commit comments