@@ -315,26 +315,24 @@ public io.vertx.ext.web.client.WebClient vertxWebClient(SSLFactory sslFactory) {
315315
316316 @ Bean
317317 public RequestService clojureHttpClientService (SSLFactory sslFactory ) {
318- IFn require = Clojure .var ("clojure.core" , "require" );
319- require .invoke (Clojure .read ("nl.altindag.client.service.ClojureHttpClientService" ));
320- IFn clojureHttpClientService = Clojure .var ("nl.altindag.client.service.ClojureHttpClientService" , "reify-request-service" );
321- return (RequestService ) clojureHttpClientService .invoke (sslFactory );
318+ return instantiateClojureRequestService ("nl.altindag.client.service.ClojureHttpClientService" , sslFactory );
322319 }
323320
324321 @ Bean
325322 public RequestService clojureJdkHttpClientService (SSLFactory sslFactory ) {
326- IFn require = Clojure .var ("clojure.core" , "require" );
327- require .invoke (Clojure .read ("nl.altindag.client.service.ClojureJdkHttpClientService" ));
328- IFn clojureJdkHttpClientService = Clojure .var ("nl.altindag.client.service.ClojureJdkHttpClientService" , "reify-request-service" );
329- return (RequestService ) clojureJdkHttpClientService .invoke (sslFactory );
323+ return instantiateClojureRequestService ("nl.altindag.client.service.ClojureJdkHttpClientService" , sslFactory );
330324 }
331325
332326 @ Bean
333- public RequestService clojureCljHttpClientService (SSLFactory sslFactory ) {
327+ public RequestService clojureCijHttpClientService (SSLFactory sslFactory ) {
328+ return instantiateClojureRequestService ("nl.altindag.client.service.ClojureCijHttpClientService" , sslFactory );
329+ }
330+
331+ private RequestService instantiateClojureRequestService (String namespace , SSLFactory sslFactory ) {
334332 IFn require = Clojure .var ("clojure.core" , "require" );
335- require .invoke (Clojure .read ("nl.altindag.client.service.ClojureCljHttpClientService" ));
336- IFn clojureJdkHttpClientService = Clojure .var ("nl.altindag.client.service.ClojureCljHttpClientService" , "reify-request-service" );
337- return (RequestService ) clojureJdkHttpClientService .invoke (sslFactory );
333+ require .invoke (Clojure .read (namespace ));
334+ IFn clojureHttpClientService = Clojure .var (namespace , "reify-request-service" );
335+ return (RequestService ) clojureHttpClientService .invoke (sslFactory );
338336 }
339337
340338}
0 commit comments