Function: smime-mail-to-domain

smime-mail-to-domain is a byte-compiled function defined in smime.el.gz.

Signature

(smime-mail-to-domain MAILADDR)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/smime.el.gz
;; Find certificates

(defun smime-mail-to-domain (mailaddr)
  (if (string-match "@" mailaddr)
      (replace-match "." 'fixedcase 'literal mailaddr)
    mailaddr))