R/add.slash.R

# Add a slash to the end of a directory listing, if required.
add.slash = function(path) {
  if(substring(path, nchar(path), nchar(path)) != "/") {
    path = paste(path, "/", sep = "")
  } # if(substring(path, nchar(path), nchar(path)) != "/"))
  return(path)
} # add.slash()
dmgatti/DOQTL documentation built on June 5, 2019, 3:05 a.m.