--- a/.emacs-my	Mon Jun 30 14:43:11 2008 -0400
+++ b/.emacs-my	Mon Jul 07 23:28:06 2008 +0300
@@ -257,9 +257,6 @@
 ;; Don't beep in my headphones!
 ;; (setq visible-bell t) ; XXX in text terminal revert screen if press [end] or [home]
 
-(setq ange-ftp-generate-anonymous-password
-      user-mail-address)
-
 ;; Prompt before evaluating local bits of lisp.  This stops people
 ;; putting things at the end of files which delete all your files!
 (setq enable-local-variables t
@@ -919,9 +916,9 @@
 ;; Setup user info.
 
 (cd "~/")
-(setq my-author-name (getenv "USER"))
-(setq user-full-name (getenv "USER"))
-(setenv "ORGANIZATION" "Oleksandr Gavenko <gavenkoa@gmail.com>")
+(setq user-full-name "Oleksandr Gavenko")
+(setq user-mail-address "gavenkoa@gmail.com")
+(setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address  ">"))
 
 (message ".emacs loaded OK.")