According to `read-string`'s doc `INITIAL-INPUT` has been deprecated in favour of `DEFAULT-VALUE`, so this should actually be:

```el
(read-string "Host: " nil nil (nrepl-current-host))
```