Skip to content

Instantly share code, notes, and snippets.

@jorgenschaefer
Created October 14, 2012 15:43
Show Gist options
  • Save jorgenschaefer/3888965 to your computer and use it in GitHub Desktop.
Save jorgenschaefer/3888965 to your computer and use it in GitHub Desktop.
(defsubst url-port (urlobj)
"Return the port number for the URL specified by URLOBJ."
(declare (gv-setter (lambda (port) `(setf (url-portspec ,urlobj) ,port))))
(or (url-portspec urlobj)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment