Abstraction leak fix

- Removed ajax-resp-timeout-val option as it should not be a user-defined value.

See taoensso#444 for context.

src/taoensso/sente/server_adapters/community/undertow.clj

@@ -54,11 +54,11 @@
 
   ISenteUndertowAjaxChannel
   (ajax-read! [sch]
-    (let [{:keys [ajax-resp-timeout-ms ajax-resp-timeout-val]}
+    (let [{:keys [ajax-resp-timeout-ms]}
           adapter-opts]
 
       (if ajax-resp-timeout-ms
-        (deref resp-promise_ ajax-resp-timeout-ms ajax-resp-timeout-val)
+        (deref resp-promise_ ajax-resp-timeout-ms nil)
         (deref resp-promise_)))))
 
 (defn- ajax-ch [{:keys [on-open on-close]} adapter-opts]
@@ -87,18 +87,12 @@
 
 (defn get-sch-adapter
   "Returns an Undertow ServerChanAdapter. Options:
-     :ajax-resp-timeout-ms  ; Max msecs to wait for Ajax responses (default 60 secs)
-     :ajax-resp-timeout-val ; Value returned in case of above timeout
-                            ; (default `:undertow/ajax-resp-timeout`)"
+     :ajax-resp-timeout-ms  ; Max msecs to wait for Ajax responses (default 60 secs)"
   ([] (get-sch-adapter nil))
   ([{:as   opts
-     :keys [ajax-resp-timeout-ms
-            ajax-resp-timeout-val]
-
-     :or   {ajax-resp-timeout-ms (* 60 1000)
-            ajax-resp-timeout-val :undertow/ajax-resp-timeout}}]
+     :keys [ajax-resp-timeout-ms]
+     :or   {ajax-resp-timeout-ms (* 60 1000)}}]
 
    (UndertowServerChanAdapter.
      (assoc opts
-       :ajax-resp-timeout-ms  ajax-resp-timeout-ms
-       :ajax-resp-timeout-val ajax-resp-timeout-val))))
+       :ajax-resp-timeout-ms  ajax-resp-timeout-ms))))