add more notices to debianpkg

[cran2deb.git] / trunk / R / debianpkg.R

diff --git a/trunk/R/debianpkg.R b/trunk/R/debianpkg.R
index b9f7d2c92bd42235fdb0a4286be7025b02e1f780..a4568bd39e21f3007ef34a79bee24e7a9d919e41 100644 (file)
--- a/trunk/R/debianpkg.R
+++ b/trunk/R/debianpkg.R
@@ -23,8 +23,8 @@ generate_changelog <- function(pkg) {
 
 generate_changelog_entry <- function(build, changelog) {
     # TODO: should say 'New upstream release' when necessary
-    debversion <- version_new(build$r_version, build$deb_revision, build$deb_epoch)
-    cat(paste(paste(build$srcname,' (',debversion,') testing; urgency=low',sep='')
+    debversion <- version_new(build$r_version, pkgname=build$package, build$deb_revision, build$deb_epoch)
+    cat(paste(paste(build$srcname,' (',debversion,') unstable; urgency=low',sep='')
              ,'' ,paste('  * cran2deb ',build$scm_revision
                        ,' with DB version ',as.integer(build$db_version),'.',sep='')
              ,'',paste(' --',maintainer,'',format(build$date_stamp,'%a, %d %b %Y %H:%M:%S %z'))
@@ -119,9 +119,13 @@ prepare_new_debian <- function(pkg,extra_deps) {
     }
 
     pkg$license <- accept_license(pkg)
+    notice('getting dependencies')
     pkg$depends <- get_dependencies(pkg,extra_deps)
+    notice('applying patches')
     apply_patches(pkg)
+    notice('applying lintian fixes')
     generate_lintian(pkg)
+    notice('generating changelog, rules, copyright, and control')
     generate_changelog(pkg)
     generate_rules(pkg)
     generate_copyright(pkg)