the binary should always have the same name as the source package

diff --git a/trunk/R/debiannaming.R b/trunk/R/debiannaming.R
index 8d11be33b1bdb2f81d50c3590ad6a9e21b48d921..724bca3a0ea4386a69383a15c44375ca685936cc 100644 (file)
--- a/trunk/R/debiannaming.R
+++ b/trunk/R/debiannaming.R
@@ -32,14 +32,15 @@ pkgname_as_debian <- function(name,repopref=NULL,version=NULL,binary=T,build=F)
         # XXX: data.frame rownames are unique, so always override repopref for
         #      now.
         debname = tolower(name)
-        if (binary) {
+### The source name should always be the same as the binary name
+###        if (binary) {
             if (name %in% rownames(available)) {
                 repopref <- tolower(repourl_as_debian(available[name,'Repository']))
             } else if (is.null(repopref)) {
                 repopref <- 'unknown'
             }
             debname = paste('r',repopref,debname,sep='-')
-        }
+###        }
     }
     if (!is.null(version) && length(version) > 1) {
         debname = paste(debname,' (',version,')',sep='')