--- 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")