Detect running via VSCode (fix #134)

HenrikBengtsson · Apr 19, 2024 · 664af6f · 664af6f
1 parent 795b6d1
commit 664af6f
Show file tree

Hide file tree

Showing 5 changed files with 25 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: startup
-Version: 0.21.0-9003
+Version: 0.21.0-9004
 Title: Friendly R Startup Configuration
 Depends: R (>= 2.14.0)
 Suggests: commonmark, tools, tcltk

diff --git a/NEWS.md b/NEWS.md
@@ -5,8 +5,8 @@
  * `startup()` gained argument `encoding`, which controls the encoding
    used to parse the R startup files.
 
- * Now `sysinfo()` return also flag `webr`, which indicates whether R
-   runs via WebR or not.
+ * Now `sysinfo()` report also on Visual Studio Code (VSCode) webR via
+   flags `vscode` and `webr`.
 
 
 # Version 0.21.0 (2023-12-11)

diff --git a/R/is_vscode.R b/R/is_vscode.R
@@ -0,0 +1,7 @@
+#' Checks if running is R via Visual Studio Code (VSCode)
+#'
+#' @return A logical
+is_vscode <- function() {
+  opt_names <- names(options())
+  "vsc.globalenv" %in% opt_names
+}
diff --git a/R/sysinfo.R b/R/sysinfo.R
@@ -26,6 +26,7 @@ sysinfo <- function() {
   ## Deprecated: Renamed rice -> rtichoke in February 2018
   sysinfo$rice <- sysinfo$radian
   sysinfo$pqr <- is_pqr()
+  sysinfo$vscode <- is_vscode()
   sysinfo$webr <- is_webr()
   sysinfo$wine <- is_wine()
 

diff --git a/man/is_vscode.Rd b/man/is_vscode.Rd