Cannot set_logger of a cloned server 

```r
library(fiery)

server <- Fire$new()
server2 <- server$clone()
server2$set_logger(fiery::logger_console("{event}: {message}"))
```

```r
Error in private$logger <- logger : 
  cannot change value of locked binding for 'logger'
```