Adjust Databricks tests to include service principal language

Author: tnederlof

tests/testthat/test-driver-databricks.R

@@ -132,7 +132,10 @@ test_that("Workbench-managed credentials are detected correctly", {
     DATABRICKS_CONFIG_FILE = file.path(db_home, "databricks.cfg")
   )
   args <- databricks_auth_args(host = "some-host")
-  expect_equal(args, list(authMech = 11, auth_flow = 0, auth_accesstoken = "token"))
+  expect_equal(
+    args,
+    list(authMech = 11, auth_flow = 0, auth_accesstoken = "token")
+  )
 })
 
 test_that("Workbench-managed credentials are ignored for other hosts", {
@@ -153,7 +156,7 @@ test_that("Workbench-managed credentials are ignored for other hosts", {
   expect_equal(databricks_auth_args(host = "some-host"), NULL)
 })
 
-test_that("we hint viewer-based credentials on Connect", {
+test_that("we hint viewer-based and service principal credentials on Connect", {
   local_mocked_bindings(
     running_on_connect = function() TRUE
   )