Merge pull request #706 from pascal-sauer/master

renkun-ken · web-flow · commit 45fc75a992a6 · 2026-02-06T23:44:46.000+08:00
explicit parse_settings = TRUE
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Type: Package
 Package: languageserver
 Title: Language Server Protocol
-Version: 0.3.16
+Version: 0.3.16.9001
 Date: 2023-08-17
 Authors@R: 
     c(person(given = "Randy",
diff --git a/R/diagnostics.R b/R/diagnostics.R
@@ -98,9 +98,9 @@ diagnose_file <- function(uri, content, is_rmarkdown = FALSE, globals = NULL, ca
     }
 
     if (file.exists(path)) {
-        lints <- lintr::lint(path, cache = cache, text = content)
+        lints <- lintr::lint(path, cache = cache, text = content, parse_settings = TRUE)
     } else {
-        lints <- lintr::lint(text = content, cache = cache)
+        lints <- lintr::lint(text = content, cache = cache, parse_settings = TRUE)
     }
 
     diagnostics <- lapply(lints, diagnostic_from_lint, content = content)

Original file line number	Diff line number	Diff line change
`@@ -98,9 +98,9 @@ diagnose_file <- function(uri, content, is_rmarkdown = FALSE, globals = NULL, ca`
`98`	`98`	`}`
`99`	`99`
`100`	`100`	`if (file.exists(path)) {`
`101`		`- lints <- lintr::lint(path, cache = cache, text = content)`
	`101`	`+ lints <- lintr::lint(path, cache = cache, text = content, parse_settings = TRUE)`
`102`	`102`	`} else {`
`103`		`- lints <- lintr::lint(text = content, cache = cache)`
	`103`	`+ lints <- lintr::lint(text = content, cache = cache, parse_settings = TRUE)`
`104`	`104`	`}`
`105`	`105`
`106`	`106`	`diagnostics <- lapply(lints, diagnostic_from_lint, content = content)`