Fixed path argument in projects()

ClevelandClinicQHS · Jun 15, 2020 · ed1cf25 · ed1cf25
1 parent ac0c8d1
commit ed1cf25
Show file tree

Hide file tree

Showing 4 changed files with 16 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: projects
 Title: A Project Infrastructure for Researchers
-Version: 2.1.1
+Version: 2.1.2
 Authors@R: 
     c(person(given = "Nik",
              family = "Krieger",

diff --git a/NEWS.md b/NEWS.md
@@ -1,4 +1,9 @@
 
+# projects 2.1.2
+
+## Minor updates:
+- Bug fix to `projects()`'s handling of the `path` argument, accommodating latest behavior of `fs::path_abs()`.
+
 # projects 2.1.1
 
 ## Minor updates:

diff --git a/R/getters.R b/R/getters.R
@@ -277,9 +277,11 @@ projects <- function(project,
 
   if (!is.null(path)) {
 
-    if (!fs::path_has_parent(path, p_path)) {
-      path <- fs::path(p_path, path)
-    }
+    path <- fs::path_abs(path, p_path)
+
+    # if (!fs::path_has_parent(path, p_path)) {
+    #   path <- fs::path(p_path, path)
+    # }
 
     if (!fs::dir_exists(path)) {
       warning("\nThe directory:\n", path, "\ndoes not exist.")

diff --git a/cran-comments.md b/cran-comments.md
@@ -1,4 +1,9 @@
 
+## Update to version 2.1.2
+There were no ERRORs, WARNINGs.
+
+NOTE on some platforms objecting to `methods` being in the `Imports` list.
+
 ## Update to version 2.1.1
 There were no ERRORs, WARNINGs.