Chapter 3.3.6 Excercises function signature seems off

[rlabuonora]

server1 <- function(input, output, server) {
  input$greeting <- renderText(paste0("Hello ", name))
}

The third argument to the server1 function should be session instead of server?

Same thing with server2, and server3 below.