~hrbrmstr/cloc

66fc80761a59a00000b631e8d77e3edc4a152d93 — boB Rudis 6 years ago c76ec1e
c'mon travis\!
M NAMESPACE => NAMESPACE +2 -0
@@ 24,4 24,6 @@ importFrom(utils,contrib.url)
importFrom(utils,download.file)
importFrom(utils,download.packages)
importFrom(utils,read.table)
importFrom(utils,setTxtProgressBar)
importFrom(utils,tail)
importFrom(utils,txtProgressBar)

M R/cloc-cran.r => R/cloc-cran.r +2 -2
@@ 36,7 36,7 @@ cloc_cran <- function(pkgs,

  # call "cloc" on each package archive, bind results into a single data frame
  if (.progress) {
    pb <- txtProgressBar(min = 0, max = length(res_p$V2), style = 3)
    pb <- utils::txtProgressBar(min = 0, max = length(res_p$V2), style = 3)
    on.exit(close(pb), add = TRUE)
  }



@@ 46,7 46,7 @@ cloc_cran <- function(pkgs,
    lapply(res_p$V2, function(x) {

      if (.progress) {
        setTxtProgressBar(pb, i)
        utils::setTxtProgressBar(pb, i)
        i <<- i + 1
      }


M R/cloc-package.r => R/cloc-package.r +1 -0
@@ 62,4 62,5 @@
#' @importFrom git2r clone
#' @importFrom processx run
#' @importFrom utils read.table contrib.url download.file download.packages tail
#' @importFrom utils setTxtProgressBar txtProgressBar
NULL

M R/cloc-recognized-languages.r => R/cloc-recognized-languages.r +1 -1
@@ 24,7 24,7 @@
#' @return tibble
#' @export
#' @examples
#' cloc_reognized_languages()
#' cloc_recognized_languages()
cloc_recognized_languages <- function() {

  perl <- Sys.which("perl")

M README.Rmd => README.Rmd +1 -1
@@ 108,7 108,7 @@ str(cloc_by_file(system.file("extdata", "App.java", package="cloc")))
Recognized languages

```{r message=FALSE, warning=FALSE, error=FALSE}
cloc_reognized_languages()
cloc_recognized_languages()
```

Strip comments and whitespace from individual source files

M man/cloc_recognized_languages.Rd => man/cloc_recognized_languages.Rd +1 -1
@@ 35,5 35,5 @@ just one or two lines for example, seldom have enough information to
correctly distinguish between MATLAB, Mercury, MUMPS, or Objective C.
}
\examples{
cloc_reognized_languages()
cloc_recognized_languages()
}

M tests/testthat/test-cloc.R => tests/testthat/test-cloc.R +1 -1
@@ 1,7 1,7 @@
context("cloc works (get it?")
test_that("core bits are functioning as expected", {

  langs <- cloc_reognized_languages()
  langs <- cloc_recognized_languages()
  expect_equal(langs$lang[4], "ADSO/IDSM")
  expect_equal(cloc_version(), "1.77")
  expect_is(cloc_os(), "character")