Set 'user-nick' if it was not defined in ~/.emacs-auth or somewhere.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Mon, 14 Nov 2011 10:21:35 +0200
changeset 825 92790cbc5fd2
parent 824 0e9a1d493295
child 826 869bc1369aca
Set 'user-nick' if it was not defined in ~/.emacs-auth or somewhere.
.emacs-my
--- a/.emacs-my	Mon Nov 14 09:58:35 2011 +0200
+++ b/.emacs-my	Mon Nov 14 10:21:35 2011 +0200
@@ -62,6 +62,8 @@
 ;; (setq user-mail-address "gavenkoa@gmail.com")
 ;; (setq user-nick "gavenkoa")
 
+(unless (and (boundp 'user-nick) (stringp user-nick))
+  (setq user-nick (user-login-name)) )
 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address  ">"))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;