Permalink
| #!/usr/bin/env Rscript | |
| p = commandArgs(TRUE) | |
| check = '--check' %in% p | |
| if (check) p = setdiff(p, '--check') | |
| if ('--replace-assign' %in% p) { | |
| p = setdiff(p, '--replace-assign') | |
| options(replace.assign = TRUE) | |
| } | |
| reformat = !('--no-format' %in% p) | |
| if (!reformat) p = setdiff(p, '--no-format') | |
| if (length(p)) { | |
| library(Rd2roxygen) | |
| invisible(lapply(p, function(x) { | |
| timestamp() | |
| message('roxygenizing ', x) | |
| rab(x, install = TRUE, check = check, reformat = reformat) | |
| })) | |
| } |