Can't override managerRetryableException for tls manager

[Yuras]

I tried to stop http-client from retrying on NoResponseDataReceived (see #495 for the context), but it didn't work:

  httpManager <- newTlsManagerWith $ tlsManagerSettings
    { managerRetryableException = \e -> traceShow e $
      case fromException e of
        Just (HttpExceptionRequest _ NoResponseDataReceived) -> False
        _ -> managerRetryableException defaultManagerSettings e
    }

I don't even see the trace. The reason is that here we fallback to the defaultManagerSettings instead of the provided settings. I'd expect something like this:

| otherwise -> managerRetryableException set e

instead of

| otherwise -> managerRetryableException defaultManagerSettings e

[Yuras]

I guess the same issue exists with managerRawConnection as well, though I didn't try it.