Function: mail-abbrevs-setup

mail-abbrevs-setup is an autoloaded and byte-compiled function defined in mailabbrev.el.gz.

Signature

(mail-abbrevs-setup)

Documentation

Initialize use of the mailabbrev package.

Probably introduced at or before Emacs version 19.1.

Source Code

;; Defined in /usr/src/emacs/lisp/mail/mailabbrev.el.gz
;;;###autoload
(defun mail-abbrevs-setup ()
  "Initialize use of the `mailabbrev' package."
  (if (and (not (obarrayp mail-abbrevs))
	   (file-exists-p mail-personal-alias-file))
      (progn
	(setq mail-abbrev-modtime
	      (file-attribute-modification-time
	       (file-attributes mail-personal-alias-file)))
	(build-mail-abbrevs)))
  (mail-abbrevs-sync-aliases)
  (add-function :around (local 'abbrev-expand-function)
                #'mail-abbrev-expand-wrapper)
  (abbrev-mode 1))