control[1,'Priority'] <- 'optional'
control[1,'Maintainer'] <- maintainer
control[1,'Build-Depends'] <- paste(pkg$depends$build, collapse=', ')
control[1,'Priority'] <- 'optional'
control[1,'Maintainer'] <- maintainer
control[1,'Build-Depends'] <- paste(pkg$depends$build, collapse=', ')
- control[1,'Standards-Version'] <- '3.8.4'
+ control[1,'Standards-Version'] <- '3.9.1'
+ if ('URL' %in% colnames(pkg$description)) {
+ control[1,'Homepage'] <- pkg$description[1,'URL']
+ }
control[2,'Package'] <- pkg$debname
control[2,'Architecture'] <- 'all'
if (pkg$archdep) {
control[2,'Architecture'] <- 'any'
}
control[2,'Package'] <- pkg$debname
control[2,'Architecture'] <- 'all'
if (pkg$archdep) {
control[2,'Architecture'] <- 'any'
}
- control[2,'Depends'] <- paste(pkg$depends$bin,collapse=', ')
+ control[2,'Depends'] <- paste(pkg$depends$bin,collapse=', ',sep='')
# write.dcf does not appear to have a nicer way of doing this.
descr <- paste(descr,'"\n\n', long_descr, sep='')
# add some extra nice info about the original R package
# write.dcf does not appear to have a nicer way of doing this.
descr <- paste(descr,'"\n\n', long_descr, sep='')
# add some extra nice info about the original R package
if (r_info %in% colnames(pkg$description)) {
descr <- paste(descr,'\n\n',r_info,': ',pkg$description[1,r_info],sep='')
}
if (r_info %in% colnames(pkg$description)) {
descr <- paste(descr,'\n\n',r_info,': ',pkg$description[1,r_info],sep='')
}