author | Oleksandr Gavenko <gavenkoa@gmail.com> |
Wed, 19 Jan 2011 11:31:52 +0200 | |
changeset 551 | 4e3276dbad80 |
parent 550 | d8092299457a |
child 552 | 1cdd21e5f0b9 |
--- a/.emacs-my Wed Jan 19 11:16:32 2011 +0200 +++ b/.emacs-my Wed Jan 19 11:31:52 2011 +0200 @@ -951,6 +951,7 @@ (let ( (mgs-list '("Я тутачки, а где Вы меня ожидали?" "Software Development == Church Development. Step 1. Build it. Step 2. Pray." "А любит Б, Б любит С, что делать A? Найти другую Б!")) ) + (random t) (setq jabber-default-show (nth (random (length mgs-list)) mgs-list)) (setq jabber-default-status (nth (random (length mgs-list)) mgs-list)) ) )