diff --git a/R/approveProbation.R b/R/approveProbation.R
index fc786c1..9f130c9 100644
--- a/R/approveProbation.R
+++ b/R/approveProbation.R
@@ -24,7 +24,7 @@
 #' # Mocking up an upload. 
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "probation", "v1", src, 
+#' uploadDirectory("test", "probation", "v1", src, 
 #'     staging=info$staging, url=info$url, probation=TRUE)
 #' fetchSummary("test", "probation", "v1", registry=info$registry)
 #'
diff --git a/R/cloneVersion.R b/R/cloneVersion.R
index 27c6b72..ed6d1a7 100644
--- a/R/cloneVersion.R
+++ b/R/cloneVersion.R
@@ -37,7 +37,7 @@
 #' # Mocking up an upload. 
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Creating a clone.
 #' dest <- tempfile()
diff --git a/R/fetchDirectory.R b/R/fetchDirectory.R
index 0128f6a..15426f1 100644
--- a/R/fetchDirectory.R
+++ b/R/fetchDirectory.R
@@ -31,7 +31,7 @@
 #' dir.create(file.path(src, "whee"))
 #' write(file=file.path(src, "whee", "blah"), "stuff")
 #' write(file=file.path(src, "whee2"), "more-stuff")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Now fetching the directory.
 #' dir <- fetchDirectory("test/simple/v1", registry=info$registry, url=info$url)
diff --git a/R/fetchLatest.R b/R/fetchLatest.R
index 5ad35f0..cb02624 100644
--- a/R/fetchLatest.R
+++ b/R/fetchLatest.R
@@ -19,8 +19,8 @@
 #'
 #' # Mocking up a few uploads.
 #' src <- allocateUploadDirectory(info$staging)
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
-#' res <- uploadDirectory("test", "simple", "v2", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v2", src, staging=info$staging, url=info$url)
 #'
 #' # Obtaining the latest version of this asset.
 #' fetchLatest("test", "simple", registry=info$registry, url=info$url)
diff --git a/R/fetchManifest.R b/R/fetchManifest.R
index 9212c20..26f304d 100644
--- a/R/fetchManifest.R
+++ b/R/fetchManifest.R
@@ -30,7 +30,7 @@
 #' write(file=file.path(src, "foo"), "BAR")
 #' dir.create(file.path(src, "whee"))
 #' write(file=file.path(src, "whee", "blah"), "stuff")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Obtaining the manifest for this version.
 #' fetchManifest("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/R/fetchSummary.R b/R/fetchSummary.R
index 939852e..0c0bde0 100644
--- a/R/fetchSummary.R
+++ b/R/fetchSummary.R
@@ -24,7 +24,7 @@
 #' # Mocking up an upload. 
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Obtain a summary for this version.
 #' fetchSummary("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/R/fetchUsage.R b/R/fetchUsage.R
index cda5df0..cc4a0d4 100644
--- a/R/fetchUsage.R
+++ b/R/fetchUsage.R
@@ -18,7 +18,7 @@
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
 #' write(file=file.path(src, "whee"), "stuff")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Obtaining the project usage.
 #' fetchUsage("test", registry=info$registry)
diff --git a/R/listFiles.R b/R/listFiles.R
index 08a2082..805ce8c 100644
--- a/R/listFiles.R
+++ b/R/listFiles.R
@@ -27,7 +27,7 @@
 #' dir.create(file.path(src, "whee"))
 #' write(file=file.path(src, "whee", "blah"), "stuff")
 #' write(file=file.path(src, "whee2"), "more-stuff")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # List files, with or without a prefix.
 #' listFiles("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/R/refreshUsage.R b/R/refreshUsage.R
index af5afdd..b321b5a 100644
--- a/R/refreshUsage.R
+++ b/R/refreshUsage.R
@@ -21,7 +21,7 @@
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
 #' write(file=file.path(src, "whee"), "stuff")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #'
 #' # Messing with the project usage:
 #' write(file=file.path(info$registry, "test", "..usage"), '{ "total": 0 }')
diff --git a/R/rejectProbation.R b/R/rejectProbation.R
index 766083f..576ee6e 100644
--- a/R/rejectProbation.R
+++ b/R/rejectProbation.R
@@ -24,7 +24,7 @@
 #' # Mocking up an upload. 
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "probation", "v1", src, 
+#' uploadDirectory("test", "probation", "v1", src, 
 #'     staging=info$staging, url=info$url, probation=TRUE)
 #' listVersions("test", "probation", registry=info$registry)
 #'
diff --git a/R/removeAsset.R b/R/removeAsset.R
index 1f85583..6c6ab3b 100644
--- a/R/removeAsset.R
+++ b/R/removeAsset.R
@@ -21,7 +21,7 @@
 #' # Mocking up an asset so we have something to remove.
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #' listAssets("test", registry=info$registry)
 #'
 #' # Removing the asset.
diff --git a/R/removeVersion.R b/R/removeVersion.R
index 57cab10..625775d 100644
--- a/R/removeVersion.R
+++ b/R/removeVersion.R
@@ -22,7 +22,7 @@
 #' # Mocking up a version if it doesn't already exist.
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #' listVersions("test", "simple", registry=info$registry)
 #'
 #' # Removing the version.
diff --git a/R/setPermissions.R b/R/setPermissions.R
index ba58be2..5c91789 100644
--- a/R/setPermissions.R
+++ b/R/setPermissions.R
@@ -30,7 +30,7 @@
 #' # Mocking up an upload. 
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
-#' res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+#' uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 #' fetchPermissions("test", registry=info$registry)
 #'
 #' # Setting them to something else.
diff --git a/R/uploadDirectory.R b/R/uploadDirectory.R
index 122d1b7..fda21c8 100644
--- a/R/uploadDirectory.R
+++ b/R/uploadDirectory.R
@@ -21,7 +21,7 @@
 #' src <- allocateUploadDirectory(info$staging)
 #' write(file=file.path(src, "foo"), "BAR")
 #'
-#' res <- uploadDirectory(
+#' uploadDirectory(
 #'     project="test", 
 #'     asset="simple", 
 #'     version="v1", 
@@ -29,7 +29,6 @@
 #'     staging=info$staging,
 #'     url=info$url
 #' )
-#' res
 #'
 #' @seealso
 #' \code{\link{createProject}}, to create a new project for uploads.
diff --git a/man/approveProbation.Rd b/man/approveProbation.Rd
index 5c4fe29..f719c1e 100644
--- a/man/approveProbation.Rd
+++ b/man/approveProbation.Rd
@@ -32,7 +32,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "probation", "v1", src, 
+uploadDirectory("test", "probation", "v1", src, 
     staging=info$staging, url=info$url, probation=TRUE)
 fetchSummary("test", "probation", "v1", registry=info$registry)
 
diff --git a/man/cloneVersion.Rd b/man/cloneVersion.Rd
index 6086bcc..47eea09 100644
--- a/man/cloneVersion.Rd
+++ b/man/cloneVersion.Rd
@@ -43,7 +43,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Creating a clone.
 dest <- tempfile()
diff --git a/man/fetchDirectory.Rd b/man/fetchDirectory.Rd
index 4f37a6f..f9eb65a 100644
--- a/man/fetchDirectory.Rd
+++ b/man/fetchDirectory.Rd
@@ -52,7 +52,7 @@ write(file=file.path(src, "foo"), "BAR")
 dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
 write(file=file.path(src, "whee2"), "more-stuff")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Now fetching the directory.
 dir <- fetchDirectory("test/simple/v1", registry=info$registry, url=info$url)
diff --git a/man/fetchLatest.Rd b/man/fetchLatest.Rd
index 2f59e05..16c381d 100644
--- a/man/fetchLatest.Rd
+++ b/man/fetchLatest.Rd
@@ -33,8 +33,8 @@ createProject("test", info$staging, url=info$url)
 
 # Mocking up a few uploads.
 src <- allocateUploadDirectory(info$staging)
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
-res <- uploadDirectory("test", "simple", "v2", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v2", src, staging=info$staging, url=info$url)
 
 # Obtaining the latest version of this asset.
 fetchLatest("test", "simple", registry=info$registry, url=info$url)
diff --git a/man/fetchManifest.Rd b/man/fetchManifest.Rd
index 3c47d14..1c08c8b 100644
--- a/man/fetchManifest.Rd
+++ b/man/fetchManifest.Rd
@@ -59,7 +59,7 @@ src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
 dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Obtaining the manifest for this version.
 fetchManifest("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/man/fetchSummary.Rd b/man/fetchSummary.Rd
index c7df166..4f4b01e 100644
--- a/man/fetchSummary.Rd
+++ b/man/fetchSummary.Rd
@@ -56,7 +56,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Obtain a summary for this version.
 fetchSummary("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/man/fetchUsage.Rd b/man/fetchUsage.Rd
index 6bc3c65..85428db 100644
--- a/man/fetchUsage.Rd
+++ b/man/fetchUsage.Rd
@@ -31,7 +31,7 @@ createProject("test", info$staging, url=info$url)
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
 write(file=file.path(src, "whee"), "stuff")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Obtaining the project usage.
 fetchUsage("test", registry=info$registry)
diff --git a/man/listFiles.Rd b/man/listFiles.Rd
index 22ee3a8..d782a23 100644
--- a/man/listFiles.Rd
+++ b/man/listFiles.Rd
@@ -53,7 +53,7 @@ write(file=file.path(src, "foo"), "BAR")
 dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
 write(file=file.path(src, "whee2"), "more-stuff")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # List files, with or without a prefix.
 listFiles("test", "simple", "v1", registry=info$registry, url=info$url)
diff --git a/man/refreshUsage.Rd b/man/refreshUsage.Rd
index 85cf05a..d469bf8 100644
--- a/man/refreshUsage.Rd
+++ b/man/refreshUsage.Rd
@@ -29,7 +29,7 @@ createProject("test", info$staging, url=info$url)
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
 write(file=file.path(src, "whee"), "stuff")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 
 # Messing with the project usage:
 write(file=file.path(info$registry, "test", "..usage"), '{ "total": 0 }')
diff --git a/man/rejectProbation.Rd b/man/rejectProbation.Rd
index f4096ab..1d0e7c4 100644
--- a/man/rejectProbation.Rd
+++ b/man/rejectProbation.Rd
@@ -32,7 +32,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "probation", "v1", src, 
+uploadDirectory("test", "probation", "v1", src, 
     staging=info$staging, url=info$url, probation=TRUE)
 listVersions("test", "probation", registry=info$registry)
 
diff --git a/man/removeAsset.Rd b/man/removeAsset.Rd
index 99a29d0..f24402d 100644
--- a/man/removeAsset.Rd
+++ b/man/removeAsset.Rd
@@ -29,7 +29,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an asset so we have something to remove.
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 listAssets("test", registry=info$registry)
 
 # Removing the asset.
diff --git a/man/removeVersion.Rd b/man/removeVersion.Rd
index 3be5516..257905e 100644
--- a/man/removeVersion.Rd
+++ b/man/removeVersion.Rd
@@ -31,7 +31,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up a version if it doesn't already exist.
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 listVersions("test", "simple", registry=info$registry)
 
 # Removing the version.
diff --git a/man/setPermissions.Rd b/man/setPermissions.Rd
index 47a3053..1ae44d4 100644
--- a/man/setPermissions.Rd
+++ b/man/setPermissions.Rd
@@ -47,7 +47,7 @@ createProject("test", info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "simple", "v1", src, staging=info$staging, url=info$url)
 fetchPermissions("test", registry=info$registry)
 
 # Setting them to something else.
diff --git a/man/uploadDirectory.Rd b/man/uploadDirectory.Rd
index bc1ec10..33d5f71 100644
--- a/man/uploadDirectory.Rd
+++ b/man/uploadDirectory.Rd
@@ -44,7 +44,7 @@ createProject("test", info$staging, url=info$url)
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
 
-res <- uploadDirectory(
+uploadDirectory(
     project="test", 
     asset="simple", 
     version="v1", 
@@ -52,7 +52,6 @@ res <- uploadDirectory(
     staging=info$staging,
     url=info$url
 )
-res
 
 }
 \seealso{
diff --git a/tests/testthat/test-cloneVersion.R b/tests/testthat/test-cloneVersion.R
index 855f48d..2fadc54 100644
--- a/tests/testthat/test-cloneVersion.R
+++ b/tests/testthat/test-cloneVersion.R
@@ -10,7 +10,7 @@ write(file=file.path(src, "foo"), "BAR")
 dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
 
-res <- uploadDirectory("test", "clone", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "clone", "v1", src, staging=info$staging, url=info$url)
 
 test_that("cloneVersion works as expected with existing files", {
     dest <- tempfile()
diff --git a/tests/testthat/test-fetch.R b/tests/testthat/test-fetch.R
index f69dfae..cf1c704 100644
--- a/tests/testthat/test-fetch.R
+++ b/tests/testthat/test-fetch.R
@@ -10,8 +10,8 @@ write(file=file.path(src, "foo"), "BAR")
 dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
 
-res <- uploadDirectory("test", "fetch", "v1", src, staging=info$staging, url=info$url)
-res <- uploadDirectory("test", "fetch", "v2", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "fetch", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "fetch", "v2", src, staging=info$staging, url=info$url)
 
 test_that("fetchManifest works as expected", {
     man <- fetchManifest("test", "fetch", "v1", registry=info$registry, url=info$url)
diff --git a/tests/testthat/test-latest.R b/tests/testthat/test-latest.R
index 34a9f99..f9c9da5 100644
--- a/tests/testthat/test-latest.R
+++ b/tests/testthat/test-latest.R
@@ -6,11 +6,11 @@ removeProject("test", staging=info$staging, url=info$url)
 createProject("test", staging=info$staging, url=info$url)
 
 src <- allocateUploadDirectory(info$staging)
-res <- uploadDirectory("test", "latest", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "latest", "v1", src, staging=info$staging, url=info$url)
 Sys.sleep(1.1) # force timestamps to be different for next versions.
-res <- uploadDirectory("test", "latest", "v2", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "latest", "v2", src, staging=info$staging, url=info$url)
 Sys.sleep(1.1)
-res <- uploadDirectory("test", "latest", "v3", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "latest", "v3", src, staging=info$staging, url=info$url)
 
 test_that("latest setting works as expected", {
     expect_identical(fetchLatest("test", "latest", registry=info$registry), "v3")
diff --git a/tests/testthat/test-list.R b/tests/testthat/test-list.R
index 2213a6a..e0b09d5 100644
--- a/tests/testthat/test-list.R
+++ b/tests/testthat/test-list.R
@@ -13,10 +13,10 @@ dir.create(file.path(src, "whee"))
 write(file=file.path(src, "whee", "blah"), "stuff")
 write(file=file.path(src, "whee2"), LETTERS)
 
-res <- uploadDirectory("test", "list", "v1", src, staging=info$staging, url=info$url)
-res <- uploadDirectory("test", "list", "v2", src, staging=info$staging, url=info$url)
-res <- uploadDirectory("test", "more-list", version="foo", src, staging=info$staging, url=info$url)
-res <- uploadDirectory("more-list-test", "list", version="bar", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "list", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "list", "v2", src, staging=info$staging, url=info$url)
+uploadDirectory("test", "more-list", version="foo", src, staging=info$staging, url=info$url)
+uploadDirectory("more-list-test", "list", version="bar", src, staging=info$staging, url=info$url)
 
 test_that("listVersions works as expected", {
     versions <- listVersions("test", "list", registry=info$registry, url=info$url)
diff --git a/tests/testthat/test-probation.R b/tests/testthat/test-probation.R
index fd9effd..6a6a8b3 100644
--- a/tests/testthat/test-probation.R
+++ b/tests/testthat/test-probation.R
@@ -8,8 +8,8 @@ createProject("test", staging=info$staging, url=info$url)
 # Mocking up an upload. 
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
-res <- uploadDirectory("test", "probation", "good", src, staging=info$staging, url=info$url, probation=TRUE)
-res <- uploadDirectory("test", "probation", "bad", src, staging=info$staging, url=info$url, probation=TRUE)
+uploadDirectory("test", "probation", "good", src, staging=info$staging, url=info$url, probation=TRUE)
+uploadDirectory("test", "probation", "bad", src, staging=info$staging, url=info$url, probation=TRUE)
                                                                                              
 test_that('probation approval works as expected', {
     expect_true(fetchSummary("test", "probation", "good", registry=info$registry)$on_probation)
diff --git a/tests/testthat/test-quota.R b/tests/testthat/test-quota.R
index 341a67d..8efba47 100644
--- a/tests/testthat/test-quota.R
+++ b/tests/testthat/test-quota.R
@@ -9,7 +9,7 @@ createProject("test-usage", info$staging, url=info$url)
 src <- allocateUploadDirectory(info$staging)
 write(file=file.path(src, "foo"), "BAR")
 write(file=file.path(src, "whee"), "stuff")
-res <- uploadDirectory("test-usage", "simple", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test-usage", "simple", "v1", src, staging=info$staging, url=info$url)
 
 test_that("usage refreshment works as expected", {
     write(file=file.path(info$registry, "test-usage", "..usage"), '{ "total": 0 }')
diff --git a/tests/testthat/test-remove.R b/tests/testthat/test-remove.R
index 7f570db..1dfae8b 100644
--- a/tests/testthat/test-remove.R
+++ b/tests/testthat/test-remove.R
@@ -6,9 +6,9 @@ removeProject("test-R-remove", staging=info$staging, url=info$url)
 createProject("test-R-remove", staging=info$staging, url=info$url)
 
 src <- allocateUploadDirectory(info$staging)
-res <- uploadDirectory("test-R-remove", "sacrifice", "v1", src, staging=info$staging, url=info$url)
+uploadDirectory("test-R-remove", "sacrifice", "v1", src, staging=info$staging, url=info$url)
 Sys.sleep(1.1) # force timestamps to be different for next versions.
-res <- uploadDirectory("test-R-remove", "sacrifice", "v2", src, staging=info$staging, url=info$url)
+uploadDirectory("test-R-remove", "sacrifice", "v2", src, staging=info$staging, url=info$url)
 
 test_that("removal functions work as expected", {
     expect_true(file.exists(file.path(info$registry, "test-R-remove", "sacrifice", "v2")))