Function: url-http-mark-connection-as-free

url-http-mark-connection-as-free is a byte-compiled function defined in url-http.el.gz.

Signature

(url-http-mark-connection-as-free HOST PORT PROC)

Source Code

;; Defined in /usr/src/emacs/lisp/url/url-http.el.gz
(defun url-http-mark-connection-as-free (host port proc)
  (let ((key (if main-thread
                 (list host port (current-thread))
               (cons host port))))
    (url-http-debug "Marking connection as free: %s:%d %S" host port proc)
    (when (memq (process-status proc) '(open run connect))
      (set-process-buffer proc nil)
      (set-process-sentinel proc 'url-http-idle-sentinel)
      (set-process-query-on-exit-flag proc nil)
      (puthash key
	       (cons proc (gethash key url-http-open-connections))
	       url-http-open-connections))
    nil))