From 312faf4499adf99d7848253c564984d5e8aa17a2 Mon Sep 17 00:00:00 2001 From: jangorecki Date: Mon, 21 Sep 2015 12:55:55 +0100 Subject: [PATCH] fix for support dots in pkgname, solves #39 --- R/insertPackage.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/insertPackage.R b/R/insertPackage.R index e50195ea..befd559b 100644 --- a/R/insertPackage.R +++ b/R/insertPackage.R @@ -184,7 +184,7 @@ getPackageInfo <- function(file) { return(fields) } - pkgname <- gsub("^([a-zA-Z0-9]*)_.*", "\\1", basename(file)) + pkgname <- gsub("^([a-zA-Z0-9.]*)_.*", "\\1", basename(file)) path <- file.path(td, pkgname, "DESCRIPTION") builtstring <- read.dcf(path, 'Built') unlink(file.path(td, pkgname), recursive=TRUE)