`expect_running` either misleading or incorrectly passing

For reproduceable example:

golem::create_golem("test")
golem::use_recommended_tests()

Changed nothing but the app_server source,

app_server <- function( input, output, session ) {
  # Your application server logic 
  stop("")
}

The recommended test of expect_running passes in these conditions. Now this is either expected behaviour but misleading in the sense that the background R process may well be running but the shiny app itself is definitely not, or this is no the expected behaviour of the test.

My reprex package attached in zip
golem_expect_running.zip

Start by unpacking the attached reprex and running the generated app with the shown app_server source. Inspect the recommended expect_running test entry point and reproduce the passing result when stop("") is called. Done means the test's behavior is clarified and covered by an appropriate regression test.