From e9516fa8f9bd9fe687872c6d52036ac0e00fa3e2 Mon Sep 17 00:00:00 2001 From: meetagrawal09 Date: Sat, 1 Jul 2023 19:30:45 +0530 Subject: [PATCH] tested rabbitmq_parse_uri --- base/remote/tests/testthat/test.rabbitmq.R | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 base/remote/tests/testthat/test.rabbitmq.R diff --git a/base/remote/tests/testthat/test.rabbitmq.R b/base/remote/tests/testthat/test.rabbitmq.R new file mode 100644 index 00000000000..2a1d749ef3d --- /dev/null +++ b/base/remote/tests/testthat/test.rabbitmq.R @@ -0,0 +1,8 @@ +test_that("`rabbitmq_parse_uri()` able to parse the rabbitmq uri to smaller variables", { + uri <- "amqp://guest:guest@localhost:15672/myvhost" + result <- rabbitmq_parse_uri(uri) + expect_equal(result$url, "http://localhost:15672/") + expect_equal(result$vhost$path, c("myvhost")) + expect_equal(result$username, "guest") + expect_equal(result$password, "guest") +})