+ #fail('upload failed!')
+ notice("Upload failed, ignored.")
+ } else {
+ notice("Upload successful.")
+ }
+## # wait for mini-dinstall to get to work
+## upload_success = FALSE
+## for (i in seq(1,12)) {
+## if (file.exists(file.path(dinstall_archive,'testing',paste(pkg$srcname, '_', pkg$version, '.orig.tar.gz', sep='')))) {
+## upload_success = TRUE
+## break
+## }
+## warn(i,'/12: does not exist',file.path(dinstall_archive,'testing',paste(pkg$srcname, '_', pkg$version, '.orig.tar.gz', sep='')))