Failure to render Rmd that creates pins on connect

[acogell]

I'm trying to publish a simple rmd that can create pins when it is run. I have no problem running this doc locally and the pins are available in connect. However, I can't seem to render the published document as it fails when evaluating this step board <- pins::board_connect() of the following reprex:

---
title: "pins"
author: "Me"
date: "`r Sys.time()`"
output: html_document
---

```{r setup}
knitr::opts_chunk$set(warning = FALSE, message = TRUE)

if (!require(pacman))
  install.packages('pacman')

pacman::p_load(bigrquery, DBI, pins, rsconnect)

wh_query <- function(query) {
  bq_table_download(bq_dataset_query(
    'prod.warehouse', query))
}
```

```{r board}
# example connection object, not necessary for reprex but wanted to leave in for context
# con = DBI::dbConnect(bigrquery::bigquery(), project = 'prod') 

board <- pins::board_connect()   # fails here and I've tried the other methods of board_connect other than "auto"

# just example of simple query that would have results pinned
# board %>% pins::pin_write(wh_query('SELECT DISTINCT id FROM programs WHERE status = "ACTIVE"'), 'me/programs')  
```

The error message is:

Error in `value[[3L]]()`:
! Failed to connect to Posit Connect instance at <https://connect.`domain`.com>
• Could not resolve host: connect.`domain`.com
Backtrace:
 1. pins::board_connect("auto")
 2. base::tryCatch(...)
 3. base (local) tryCatchList(expr, classes, parentenv, handlers)
 4. base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 5. value[[3L]](cond)
Execution halted
Unable to render the deployed content: Rendering exited abnormally: exit status 1

Domain was scrubbed for privacy. I'm working in a Posit Connect Enhanced(ish; no API publishing) environment. I have no problem publishing rmd without this pins::board_connect() call.

Thank you!