diff --git a/tests/testthat/test-add_list_load_rm_pkgs.R b/tests/testthat/test-add_list_load_rm_pkgs.R index 5323e99..38d95d9 100644 --- a/tests/testthat/test-add_list_load_rm_pkgs.R +++ b/tests/testthat/test-add_list_load_rm_pkgs.R @@ -102,10 +102,19 @@ test_that("add_pkgs, list_pkgs, load_pkgs, rm_pkgs works", { ) expect_warning( - load_pkgs(branch_name = "update_description", git_pull = TRUE), + load_pkgs(branch_name = "update_description"), "Can't switch to update_description" ) + expect_output( + load_pkgs(branch_name = "update_description", load_verbose = ""), + "Can't switch to update_description" + ) + + expect_error( + load_pkgs(branch_name = "update_description", load_verbose = "error") + ) + rm_pkgs("formultiloadrunittest") x <- getOption("multiloadr") expect_equal(length(x), 0)