R/filePath.R

In John-R-Wallace/JRWToolBox: What the package does (short line)

 
filePath <- function(oldPath = readClipboard()) 
{
    '  # filePath takes path from the clipboard and replaces it with the machine dependent correct path, which is also output  '
    '  # "<" can not occur in a Windows file name, nor does it have a special meaning when replacing characters '
    correctPath <- do.call(file.path, as.list(strsplit(gsub("\\\\", "<", oldPath), "<")[[1]]))
    cat(correctPath, file = "clipboard")
    correctPath
}