--- a/.emacs-my	Mon Jan 17 15:11:11 2011 +0200
+++ b/.emacs-my	Mon Jan 17 15:15:02 2011 +0200
@@ -933,6 +933,14 @@
    )
   )
 
+(when (featurep 'jabber)
+  (let ( (mgs-list '("Я тутачки, а где Вы меня ожидали?"
+                     "Software Development == Church Development. Step 1. Build it. Step 2. Pray."
+                     "А любит Б, Б любит С, что делать A? Найти другую Б!")) )
+    (setq jabber-default-show (nth (random (length mgs-list)) mgs-list))
+    (setq jabber-default-status (nth (random (length mgs-list)) mgs-list))
+    )
+
 ;; fsm used in emacs jabber
 (when (featurep 'fsm)
   (setq fsm-debug nil)                  ; Disable *fsm-debug* buffer.