Commit c5f7d536 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(auto-insert-alist): Use user-mail-address.

parent 764b077c
......@@ -151,7 +151,7 @@ If this contains a %s, that will be replaced by the matching rule."
;; Author: " (user-full-name)
'(if (search-backward "&" (save-excursion (beginning-of-line 1) (point)) t)
(replace-match (capitalize (user-login-name)) t t))
'(end-of-line 1) " <" (user-login-name) ?@ (system-name) ">
'(end-of-line 1) " <" (progn user-mail-address) ">
;; Keywords: "
'(require 'finder)
;;'(setq v1 (apply 'vector (mapcar 'car finder-known-keywords)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment