Move user info to top.
--- a/.emacs-my Mon Jan 17 14:57:40 2011 +0200
+++ b/.emacs-my Mon Jan 17 15:03:36 2011 +0200
@@ -19,6 +19,13 @@
(setq debug-on-error nil) ; t/nil
;;; ----------------------------------------------------------------
+;;; user info.
+
+(setq user-full-name "Oleksandr Gavenko")
+(setq user-mail-address "gavenkoa@gmail.com")
+(setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">"))
+
+;;; ----------------------------------------------------------------
;;; mode groups.
(defun my-modelist-to-hooklist (modes)
@@ -69,7 +76,6 @@
(my-modelist-to-hooklist my-text-mode-list)
"List of text mode hooks.")
-
;;; ----------------------------------------------------------------
;;; appearance.
@@ -1411,12 +1417,8 @@
;; Note: if you kill unsaved file auto save file not deleted.
(setq delete-auto-save-files t)
-;;; ----------------------------------------------------------------
-;;; user info.
-
-(setq user-full-name "Oleksandr Gavenko")
-(setq user-mail-address "gavenkoa@gmail.com")
-(setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">"))
+;; ----------------------------------------------------------------
+;; User welcome msg.
(add-hook 'emacs-startup-hook
(lambda ()