 
 (def enabled-extensions [
 	neveragain.rfc/extension-description
+	neveragain.tls/extension-description
 ])
 
 (def verb-handler-map (rewrite-ehlo (reduce

		(neveragain 
			[common :refer :all] 
			[settings :as settings]
			rfc))
	(:import 
		(java.net ServerSocket InetAddress)
 		(java.util.concurrent Executors)
		(java.io PrintWriter InputStreamReader BufferedReader)))

	; seems to work. Every function is supposed to return envl, and in
	; this way modify session state. If a handler function retuns nil instead we
	; take that to mean this sessions has ended.
	(loop [envl {} inner-conn conn]
		(let [msg (.readLine (:in inner-conn))]
			(let [response (respond inner-conn msg envl)]
				(cond 
					(= (type response) SSLSocket) (recur envl response)
					(= response nil) nil
					:else (recur response inner-conn))))))

(defn serve-forever [port-number thread-count]
	(let [serv-socket (ServerSocket. port-number)]
