Function: what-domain

what-domain is an autoloaded, interactive and byte-compiled function defined in mail-extr.el.gz.

Signature

(what-domain DOMAIN)

Documentation

Convert mail domain DOMAIN to the country it corresponds to.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mail/mail-extr.el.gz
;;;###autoload
(defun what-domain (domain)
  "Convert mail domain DOMAIN to the country it corresponds to."
  (interactive
   (let ((completion-ignore-case t))
     (list (completing-read "Domain: "
			    mail-extr-all-top-level-domains nil t))))
  (or (setq domain (intern-soft (downcase domain)
				mail-extr-all-top-level-domains))
      (error "No such domain"))
  (message "%s: %s" (upcase (symbol-name domain)) (get domain 'domain-name)))