# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1295270102 -7200
# Node ID 9880931494429e857405f31bcceb68a4f61b6be9
# Parent  15b63e0cc4241e717b93ddfb4a1cead70f218f52
Random set jabber status msg.

diff -r 15b63e0cc424 -r 988093149442 .emacs-my
--- 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.