Merge pull request #172 from lorenzwalthert/issue-171

- Better roxygen2 cache (#172).

Author: lorenzwalthert

NEWS.md

@@ -2,6 +2,12 @@
 
 Initial CRAN release. See https://lorenzwalthert.github.io/precommit/.
 
+# precommit v0.0.0.9049 (development)
+
+- Roxygen hook cache only includes files that are part of the index and 
+  will hence be able to use the cache in cases it was previously invalidated 
+  without need (#171).
+
 
 # precommit v0.0.0.9048
 

inst/WORDLIST

@@ -29,6 +29,7 @@ EOF
 exlucded
 fs
 getOption
+getwd
 gh
 github
 gitignore
@@ -46,19 +47,22 @@ knitr
 lang
 Lifecycle
 lintr
+loadCache
 lorenz
 lorenzwalthert
 macOS
 magrittr
 maxkb
 md
 miniconda
+mtime
 navbar
 netlify
 nrow
 oneliner
 os
 overscope
+packageVersion
 params
 parsable
 pkgapi
@@ -89,6 +93,7 @@ roclet
 roclets
 ropenscilabs
 roxygen
+roxygenise
 roxygenize
 RoxygenNote
 Rprofile
@@ -99,11 +104,13 @@ Rr
 Rscript
 RStudio
 rstudioapi
+saveCache
 seealso
 stderr
 stdout
 stopifnot
 styler
+Sys
 testthat
 tidyverse
 travis
@@ -115,6 +122,7 @@ usr
 VignetteBuilder
 walthert
 Walthert
+wd
 withr
 wordlist
 writeLines

inst/bin/roxygenize

@@ -38,7 +38,10 @@ wd <- list(getwd())
 cache <- loadCache(key = wd, dirs = path_relative_cache)
 
 if (!is.null(cache)) {
-  candidates <- list.files(c("R", "man"), full.names = TRUE)
+  candidates <- intersect(
+    list.files(c("R", "man"), full.names = TRUE),
+    arguments$files
+  )
   all_files <- file.info(candidates)
   last_modified <- max(all_files$mtime)
   if (last_modified > cache[[1]]) {