Skip to content

Instantly share code, notes, and snippets.

@tkhoa2711

tkhoa2711/get-ip-address.el

Created March 9, 2016 02:47
Show Gist options
  • Save tkhoa2711/ef99938c8752ca3e52c2 to your computer and use it in GitHub Desktop.
Save tkhoa2711/ef99938c8752ca3e52c2 to your computer and use it in GitHub Desktop.
Download ZIP
Retrieve IP address using Emacs Lisp (on Windows and UNIX)
Raw
get-ip-address.el
(defun get-ip-address (&optional dev)
"Get the IP-address for device DEV (default: eth0) of the current machine."
(let ((dev (if dev dev "eth0")))
(format-network-address (car (network-interface-info dev)) t)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment