X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=trunk%2FR%2Fbuild.R;h=540610f2fda99fb14ffb37f82c954f350bd91641;hb=01d5d539cb2ccb4840ee1f2d88beeb0381740e72;hp=3855a27d8251a88bc580a50213ea7adaea61ef3b;hpb=b927c8876e7714e24547fd229f291891023aa170;p=cran2deb.git

diff --git a/trunk/R/build.R b/trunk/R/build.R
index 3855a27..540610f 100644
--- a/trunk/R/build.R
+++ b/trunk/R/build.R
@@ -1,5 +1,5 @@
 
-build <- function(name,extra_deps,force=F) {
+build <- function(name,extra_deps,force=F,do_cleanup=T) {
     # can't, and hence don't need to, build base packages
     if (name %in% base_pkgs) {
         return(T)
@@ -58,7 +58,11 @@ build <- function(name,extra_deps,force=F) {
         }
         return(pkg$debversion)
     })())
-    cleanup(dir)
+    if (do_cleanup) {
+        cleanup(dir)
+    } else {
+        notice('output is in',dir,'. you must clean this up yourself.')
+    }
     if (is.null(result)) {
         # nothing was done so escape asap.
         return(result)