# HG changeset patch # User Oleksandr Gavenko # Date 1348129775 -10800 # Node ID ab0ce5cb09bfd7c8c51e864f32672431e591e7e0 # Parent dc590d8c6f7bdafa9a7d5621255286786b067ba4 Add link to my home page in Organization mail header. diff -r dc590d8c6f7b -r ab0ce5cb09bf .emacs-my --- a/.emacs-my Thu Sep 20 11:11:11 2012 +0300 +++ b/.emacs-my Thu Sep 20 11:29:35 2012 +0300 @@ -62,10 +62,17 @@ ;; (setq user-full-name "Oleksandr Gavenko") ;; (setq user-mail-address "gavenkoa@gmail.com") ;; (setq user-nick "gavenkoa") +;; (setq user-home-page "http://gavenkoa.users.sf.net") (unless (and (boundp 'user-nick) (stringp user-nick)) (setq user-nick (user-login-name)) ) -(setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">")) +;; auto-insert and copyright package use this to insert copyright owner. Gnus +;; uses this for Organization header. +(setenv "ORGANIZATION" + (concat + user-full-name + " <" user-mail-address ">" + (when (boundp 'user-home-page) (concat ", " user-home-page)))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (message "my defun, defmacro, defvar")