'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
See section ‘Generic functions and methods’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
See chapter ‘System and foreign language interfaces’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
All user-level objects in a package should have documentation entries.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
The \usage entries for S3 methods should use the \method markup and not
their full name.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
Running ‘winpath.R’ [2s/3s]
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
See section ‘Generic functions and methods’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
See chapter ‘System and foreign language interfaces’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
All user-level objects in a package should have documentation entries.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
'getOption("repos")' replaces Bioconductor standard repositories, see
'help("repositories", package = "BiocManager")' for details.
Replacement repositories:
    CRAN: file:///srv/R/Repositories/CRAN
The \usage entries for S3 methods should use the \method markup and not
their full name.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
Running ‘winpath.R’ [1s/3s]
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

See section ‘Generic functions and methods’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

See chapter ‘System and foreign language interfaces’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

All user-level objects in a package should have documentation entries.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

The \usage entries for S3 methods should use the \method markup and not
their full name.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
Running ‘winpath.R’
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

See section ‘Generic functions and methods’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

See chapter ‘System and foreign language interfaces’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

All user-level objects in a package should have documentation entries.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R
'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

'getOption("repos")' replaces Bioconductor standard repositories, see
'?repositories' for details

replacement repositories:
    CRAN: file:///data/gannet/ripley/R

The \usage entries for S3 methods should use the \method markup and not
their full name.
See chapter ‘Writing R documentation files’ in the ‘Writing R
Extensions’ manual.
Running ‘winpath.R’
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  'getOption("repos")' replaces Bioconductor standard repositories, see
  '?repositories' for details
  
  replacement repositories:
      CRAN: file:///data/gannet/ripley/R
  
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
Running 'winpath.R' [3s]
Running the tests in 'tests/winpath.R' failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  Switchr needs a default CRAN mirror set via R options. Using the cloud mirror. This happens only when no CRAN mirror is selected *and* the BiocInstaller package is not installed.
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
Running ‘winpath.R’ [3s/5s]
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  Switchr needs a default CRAN mirror set via R options. Using the cloud mirror. This happens only when no CRAN mirror is selected *and* the BiocInstaller package is not installed.
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
Running ‘winpath.R’ [3s/6s]
Running the tests in ‘tests/winpath.R’ failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  Switchr needs a default CRAN mirror set via R options. Using the cloud mirror. This happens only when no CRAN mirror is selected *and* the BiocInstaller package is not installed.
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
Running 'winpath.R' [5s]
Running the tests in 'tests/winpath.R' failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  Switchr needs a default CRAN mirror set via R options. Using the cloud mirror. This happens only when no CRAN mirror is selected *and* the BiocInstaller package is not installed.
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted
Running 'winpath.R' [14s]
Running the tests in 'tests/winpath.R' failed.
Complete output:
  > library(switchr)
  > ## if(getOption("repos")["CRAN"] == "@CRAN@")
  > ##     chooseCRANmirror(ind=1L)
  > graceful_inet(TRUE)
  [1] TRUE
  > checkUrlRoundtrip = function(pth) {
  +     pth = switchr:::normalizePath2(pth)
  +     furl = switchr:::makeFileURL(pth)
  +     pth2 = switchr:::fileFromFileURL(furl)
  +     if(pth != pth2)
  +         stop("Round trip result (", pth2, ") does not match original (", pth, ") when creating file URLs")
  + }
  > 
  > ## regression test to ensure that the roundtrip
  > ## between path and file url is working properly
  > checkUrlRoundtrip(getwd())
  > checkUrlRoundtrip(tempdir())
  > if(switchr:::isWindows())
  +     checkUrlRoundtrip("\\\\localhost\\c$")
  > 
  > ## regreossion test to ensure that package dependencies
  > ## are added to the dontunload list when a package
  > ## is specified
  > bef = switchrDontUnload()
  > af = switchrDontUnload("knitr")
  Switchr needs a default CRAN mirror set via R options. Using the cloud mirror. This happens only when no CRAN mirror is selected *and* the BiocInstaller package is not installed.
  Warning: unable to access index for repository http://bioconductor.org/packages/3.13/bioc/src/contrib:
    cannot open URL 'http://bioconductor.org/packages/3.13/bioc/src/contrib/PACKAGES'
  Warning: unable to access index for repository http://bioconductor.org/packages/3.13/data/annotation/src/contrib:
    cannot open URL 'http://bioconductor.org/packages/3.13/data/annotation/src/contrib/PACKAGES'
  Warning: unable to access index for repository http://bioconductor.org/packages/3.13/data/experiment/src/contrib:
    cannot open URL 'http://bioconductor.org/packages/3.13/data/experiment/src/contrib/PACKAGES'
  > stopifnot(all(c("stringr", "stringi", "magrittr") %in% af))
  Error: all(c("stringr", "stringi", "magrittr") %in% af) is not TRUE
  Execution halted