.emacs-my
changeset 250 ef1c7269280f
parent 249 f37450e3cfa2
child 251 99a4fc940294
--- a/.emacs-my	Mon Jan 18 23:06:33 2010 +0200
+++ b/.emacs-my	Mon Jan 18 23:17:52 2010 +0200
@@ -1058,7 +1058,11 @@
 (setq user-mail-address "gavenkoa@gmail.com")
 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address  ">"))
 
-(message "You enter to Space. Emacs power on.")
+(add-hook 'emacs-startup-hook
+          (lambda ()
+            (let ( (mgs-list '("Welcome to emacs, the thermonuclear editor."
+                               "You enter to Out Space. Emacs on."
+                               "Nice day for Emacsing!")) )
+              (message (nth (random (length mgs-list)) mgs-list)))))
 
-;;
 ;; End loading...